Word) (Tasks 对象
Task 对象的集合,表示当前在系统上运行的所有任务。
使用 Tasks 属性可返回 Tasks 集合。 以下示例确定 Microsoft Excel 是否正在运行。 如果是,则切换至该程序并将其最大化;否则,启动该程序。
If Tasks.Exists("Microsoft Excel") = True Then
Tasks("Microsoft Excel").Activate
Tasks("Microsoft Excel").WindowState = wdWindowStateMaximize
Else
Shell "C:\Program Files\" & _
"Microsoft Office\Office10\Excel.exe"
End If
使用 Visual Basic 的 Shell 函数可运行一个可执行程序并将该程序添加到 Tasks 集合。
使用 任务 (索引),其中索引是应用程序的名称或索引号,返回单个 任务 对象。 以下示例打开 Tasks 集合中第一个可见任务的应用程序窗口并调整其大小。
With Tasks(1)
If .Visible = True Then
.Activate
.Width = 400
.Height = 200
End If
End With
如果“计算器”应用程序在 Tasks 集合中,则以下示例恢复该应用程序窗口。
If Tasks.Exists("Calculator") = True Then
Tasks("Calculator").WindowState = wdWindowStateNormal
End If
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。