One way:

Public Function WhoAmI() As String
If TypeName(Application.Caller) = "Range" Then _
WhoAmI = Application.Caller.Address(0, 0)
End Function



In article ,
"John H W" wrote:

I know that you can call or find out the the active cell when in a
function/sub, but I can not find out if there is a way to find out the
CALLING cell (without out passing the value as a parameter).

Thanks,
John H W