Свойство Application.Active (PowerPoint)

Возвращает значение, указывающее, активна ли указанная область или окно. Только для чтения.

Синтаксис

expression. Активный

выражение: переменная, представляющая объект Application.

Возвращаемое значение

MsoTriState

Замечания

Значение, возвращаемое свойством Active , может быть одной из этих констант MsoTriState .

Константа	Описание
msoFalse	Указанная область или окно неактивны.
msoTrue	Указанная область или окно активна.

Пример

В этом примере проверяется, находится ли файл презентации "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

См. также

Объект Application

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.