In diesem Beispiel werden Informationen darüber angezeigt, wie Visual Basic aufgerufen wurde.
Select Case TypeName(Application.Caller) Case "Range" v = Application.Caller.Address Case "String" v = Application.Caller Case "Error" v = "Error" Case Else v = "unknown" End Select MsgBox "caller = " & v