Событие Application. Пресентатионопен (PowerPoint)Application.PresentationOpen event (PowerPoint)

Возникает после открытия существующей презентации, так как она добавляется в коллекцию презентаций .Occurs after an existing presentation is opened, as it is added to the Presentations collection.

СинтаксисSyntax

выражение.expression. PresentationOpen( _Pres_ )

Expression (выражение ) Выражение, возвращающее объект Application .expression An expression that returns a Application object.

ПараметрыParameters

ИмяName Обязательный или необязательныйRequired/Optional Тип данныхData type ОписаниеDescription
ПресPres ОбязательныйRequired PresentationPresentation Открытая презентация.The presentation that is opened.

ПримечанияRemarks

Сведения об использовании событий с объектом Application можно узнать в статье как: использование событий с объектом Application.For information about using events with the Application object, see How to: Use Events with the Application Object.

Если решение Visual Studio содержит ссылку Microsoft. Office. Interop. PowerPoint , это событие сопоставляется со следующими типами:If your Visual Studio solution includes the Microsoft.Office.Interop.PowerPoint reference, this event maps to the following types:

  • Microsoft. Office. Interop. PowerPoint. еаппликатион_пресентатионопеневенсандлер (делегат пресентатионопен .)Microsoft.Office.Interop.PowerPoint.EApplication_PresentationOpenEventHandler (the PresentationOpen delegate.)

  • Microsoft. Office. Interop. PowerPoint. еаппликатион_евент. пресентатионопен (событие пресентатионопен .)Microsoft.Office.Interop.PowerPoint.EApplication_Event.PresentationOpen (the PresentationOpen event.)

ПримерExample

В этом примере изменяется цвет фона для цветовой схемы "три", применяется измененная цветовая схема к презентации, которая была только что открыта, и отображение презентации в режиме слайда.This example modifies the background color for color scheme three, applies the modified color scheme to the presentation that was just opened, and displays the presentation in slide view.

Private Sub App_PresentationOpen(ByVal Pres As Presentation) 
    With Pres 
        Set CS3 = .ColorSchemes(3) 
        CS3.Colors(ppBackground).RGB = RGB(240, 115, 100) 
        With Windows(1) 
            .Selection.SlideRange.ColorScheme = CS3 
            .ViewType = ppViewSlide 
        End With 
    End With 
End Sub

См. такжеSee also

Объект ApplicationApplication Object

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

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи?Have questions or feedback about Office VBA or this documentation? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.