EXCEL VBAvba中断运行 快捷键GetObject获取不到Application,问题处在哪里?

返回对 ActiveX 组件提供的对象的引用。

可选;Variant (String)。 包含要检索的对象的文件的完整路径和名称。 如果省略了 pathname,则 class 是必须的。
必需;Variant (String)。 提供要创建的对象的类的类型。

使用 GetObject 函数可从文件访问 ActiveX 对象并将该对象分配给 。 使用 语句将 GetObject 返回的对象分配给对象变量。 例如:

执行此代码时,将启动与指定 pathname 关联的应用程序,并激活指定文件中的对象。

如果 pathname 是零长度字符串 (""),GetObject 将返回指定类型的新对象实例。 如果省略了 pathname 参数,GetObject 将返回指定类型的当前活动对象。 如果不存在指定类型的对象,则会发生错误。

某些应用程序允许您激活文件的部分。 将感叹号 () 添加到文件名的末尾,然后使用标识要激活的文件部分的字符串跟踪它。 若要了解如何创建此字符串,请参阅创建对象的应用程序的文档。

例如,在绘图应用程序中,可能会将绘图的多个图层存储在一个文件中。 可以使用以下代码在名为 的绘图中激活图层 SCHEMA.CAD

如果不指定对象的类,自动化将基于您提供的文件名确定要启动的应用程序和要激活的对象。 但是,某些文件可能支持多个对象类。 例如,绘图可能支持三个不同类型的对象: Application 对象、 Drawing 对象和 Toolbar 对象,所有这些对象都是同一文件的一个部分。 若要指定文件中要激活的对象,请使用可选的 class 参数。 例如:

在示例中, FIGMENT 是绘图应用程序的名称, DRAWING 是它支持的对象类型之一。 激活对象后,使用定义的对象变量在代码中引用该对象。 在上一示例中,通过使用对象 变量 MyObject 访问新对象的属性和方法。 例如:

[!注释] 如果存在对象的当前实例或要使用已加载的文件创建对象,则使用 GetObject 函数。 如果没有当前实例,并且不希望对象以加载的文件开始,请使用

如果对象本身注册为单实例对象,无论执行多少次 CreateObject 都只创建一个对象实例。 对于单实例对象,当使用零长度字符串 ("") 语法进行调用时,GetObject 始终返回相同的实例;如果省略了 pathname 参数,则会导致错误。 您无法使用

接下来,示例代码使Microsoft Excel和包含指定工作表的窗口可见。 最后,如果没有以前版本的 Microsoft Excel 运行,此代码将使用 Application 对象的 Quit 方法关闭 Microsoft Excel。 如果应用程序已在运行,则不会尝试关闭它。 引用本身通过设置为 Nothing 来

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 ,获取有关如何接收支持和提供反馈的指南。

我知道这是一个旧帖子,但对于那些通过搜索访问此处的人可能会发现它很有帮助。 找到并修改了此代码。它将在每个实例的每个WORKBOOK中为您提供每个SHEET。从那里,您可以确定活动实例。 模块..............

码…………………...

我要回帖

更多关于 vba中断运行 快捷键 的文章

 

随机推荐