ActivePageWindow 属性

返回 Application 或站点窗口的 PageWindowEx 对象。

expression.ActivePageWindow

expression 必选。返回“应用于”列表中的对象之一的表达式。

示例

下列示例返回 Application 对象的 PageWindowEx 对象。

Private Sub GetActivePageWindow()
    Dim myPageWindow As PageWindowEx

    Set myPageWindow = ActivePageWindow
End Sub

下列示例从 WebWindowEx 对象返回 PageWindowEx 对象。

Private Sub GetActivePageWindow()
    Dim myPage As PageWindowEx

    Set myPage = ActiveWebWindow.ActivePageWindow
End Sub