返回指定的窗格或窗口是否处于激活的状态。只读。MsoTriState 类型。
| MsoTriState 可以是下列 MsoTriState 类型常数之一。 | 
| msoCTrue | 
| msoFalse | 
| msoTriStateMixed | 
| msoTriStateToggle | 
| msoTrue 指定的窗格或窗口处于激活状态。 | 
expression.Active
expression 必选。该表达式返回“应用于”列表中的对象之一。
本示例检查演示文稿文件“test.ppt”是否位于当前窗口。如果不是,则将当前处于激活状态的演示文稿的名称保存在变量 oldWin 中,并激活“test.ppt”演示文稿。
With Application.Presentations("test.ppt").Windows(1)
    If Not .Active Then
        Set oldWin = Application.ActiveWindow
        .Activate
    End If
End With