You wrote so :
* * *'Execute XLM macro

* * MsgBox (Arg)
* * On Error Resume Next
GetValue = ExecuteExcel4Macro(Arg)
End Function

Ask :
,,ExecuteExcel4Macro(Arg),, is a name of a macro ?

Do you want to Call (Run) a macro from this function ?