Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Возвращает объект Window , представляющий активное окно (окно с фокусом). Только для чтения.
Синтаксис
expression. ActiveWindow
Выражение Переменная, представляющая объект Document .
Замечания
Если открытые окна отсутствуют, при использовании свойства 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 и обратная связь.