How can I run my macro within a function

[exceere]

Hi.

I typed the following code

Function RunMacro(FunctionName As String)
Application.Run FunctionName
RunMacro = ""
End Function

Sub noclr()
MsgBox "Nothing to clear"
End Sub

Sub clrows()
Sheets("Sheet1").Range("B:B").ClearContents
End Sub

When i type: = RunMacro("noclr"), it excute macro "noclr" and shows the MsgBox

But when i type: = RunMacro("clrows"), it do nothing, and the coulom "D" not cleared

How can I adjust the code so that execeute macro "clrows"

 

[pgc01]

Hi

Your post is not clear.

Are you trying to execute the function using it in a formula in a cell?

If that's the case it won't work. Functions that are to be used in formulas in cells (called UDF's), like the excel built-in functions, can only be used to calculate a value that is used to determine the value of the cell where they are used.