AppActivate 语句

激活应用程序窗口。

语法

AppActivate标题， [ 等待 ]

AppActivate 语句语法具有下列命名参数：

Part	说明
title	必填。 指定要激活的应用程序窗口的标题栏中的标题的字符串表达式。 可使用 Shell 函数返回的任务 ID 代替 title 激活应用程序。
等	可选。 指定在激活另一个应用程序之前，调用应用程序是否具有焦点的 Boolean 值。 如果为 False（默认值），则将立即激活指定应用程序，即使调用应用程序没有焦点也是如此。 如果 为 True，则调用应用程序将等待，直到具有焦点，然后激活指定的应用程序。

备注

AppActivate 语句将焦点更改为命名应用程序或窗口，但不会影响最大化还是最小化它。 焦点在用户执行某个操作更改焦点或关闭窗口时将从已激活的应用程序窗口移动。 使用 Shell 函数可启动应用程序并设置窗口样式。

在确定要激活的应用程序时，title 将与每个正在运行的应用程序的标题字符串进行比较。 如果没有完全匹配的项，则将激活其标题字符串以 title 开头的任何应用程序。 如果有多个按 title 命名的应用程序的实例，则将任意激活一个实例。

示例

此示例演示各种使用 AppActivate 语句激活应用程序窗口的方式。 Shell 语句假定应用程序位于指定的路径中。 在 Macintosh 中，默认的驱动器名称为“HD”，路径名的各个部分用冒号而不是反斜杠分隔。

Dim MyAppID, ReturnValue 
AppActivate "Microsoft Word" ' Activate Microsoft 
 ' Word. 
 
' AppActivate can also use the return value of the Shell function. 
MyAppID = Shell("C:\WORD\WINWORD.EXE", 1) ' Run Microsoft Word. 
AppActivate MyAppID ' Activate Microsoft 
 ' Word. 
 
' You can also use the return value of the Shell function. 
ReturnValue = Shell("c:\EXCEL\EXCEL.EXE",1) ' Run Microsoft Excel. 
AppActivate ReturnValue ' Activate Microsoft 
 ' Excel. 

另请参阅

• 数据类型
• 语句

支持和反馈

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