返回一个Application 对象，表示对象的容器应用程序（可以使用 Automation 对象的该属性返回对象的容器应用程序）。
expression.Application
expression 必需。该表达式返回“应用于”列表中的对象之一。
本示例返回创建名为 Standard 的命令栏的应用程序名称，并在消息框中显示该结果。
Set Appobj = CommandBars("Standard").Application MsgBox Appobj
