返回一个 Window 对象,该对象代表活动窗口(焦点所在的窗口)。 只读。
语法
表达式。ActiveWindow
表达 一个代表“全局”对象的变量。
备注
如果没有打开的窗口,则使用该属性将导致出错。
示例
本示例显示活动窗口的标题文本。
Sub WindowCaption()
MsgBox ActiveDocument.ActiveWindow.Caption
End Sub
本示例为活动文档的活动窗口打开一个新窗口,然后平铺所有窗口。
Sub WindowTiled()
Dim wndTileWindow As Window
Set wndTileWindow = ActiveDocument.ActiveWindow.NewWindow
Windows.Arrange ArrangeStyle:=wdTiled
End Sub
本示例拆分第一个文档窗口。
Sub WindowSplit()
Documents(1).ActiveWindow.Split = True
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。