Application Property Example
This example returns the name of the application in which the command bar named "Documents" was created and displays this result in a message box.
Set Appobj = CommandBars("Standard").Application MsgBox Appobj