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

Происходит, когда локальная копия презентации, которая является частью рабочей области для документов, синхронизируется с копией на сервере.Occurs when the local copy of a presentation that is part of a Document Workspace is synchronized with the copy on the server. Содержит важные сведения о состоянии, связанные с успехом или сбоем синхронизации презентации.Provides important status information regarding the success or failure of the synchronization of the presentation.

СинтаксисSyntax

выражение.expression. PresentationSync( _Pres_, _SyncEventType_ )

выражение: переменная, представляющая объект Application.expression A variable that represents an Application object.

ПараметрыParameters

ИмяName Обязательный или необязательныйRequired/Optional Тип данныхData type ОписаниеDescription
ПресPres ОбязательныйRequired PresentationPresentation Синхронизированная презентация.The presentation that is being synchronized.
СинцевенттипеSyncEventType ОбязательныйRequired MsoSyncEventTypeMsoSyncEventType Состояние синхронизации.The status of the synchronization.

ПримечанияRemarks

Значение параметра синцевенттипе может быть одной из этих констант мсосинцевенттипе .The SyncEventType parameter value can be one of these MsoSyncEventType constants.

МсосинцевентдовнлоадинитиатедmsoSyncEventDownloadInitiated
МсосинцевентдовнлоадсукцеедедmsoSyncEventDownloadSucceeded
МсосинцевентдовнлоадфаиледmsoSyncEventDownloadFailed
МсосинцевентуплоадинитиатедmsoSyncEventUploadInitiated
МсосинцевентуплоадсукцеедедmsoSyncEventUploadSucceeded
МсосинцевентуплоадфаиледmsoSyncEventUploadFailed
МсосинцевентдовнлоадночанжеmsoSyncEventDownloadNoChange
МсосинцевентоффлинеmsoSyncEventOffline

ПримерExample

В приведенном ниже примере отображается сообщение, если при синхронизации презентации в рабочей области для документов возникает ошибка.The following example displays a message if the synchronization of a presentation in a Document Workspace fails.

Private Sub app_PresentationSync(ByVal Pres As Presentation, _
        ByVal SyncEventType As Office.MsoSyncEventType)

    If SyncEventType = msoSyncEventDownloadFailed Or _
            SyncEventType = msoSyncEventUploadFailed Then

        MsgBox "Synchronization failed. " & _
            "Please contact your administrator, " & vbCrLf & _
            "or try again later."

    End If

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.