PresentationSync Event
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.
expression.PresentationSync(Pres, SyncEventType)
expression Required. An expression that returns the Application object.
Pres The presentation that is being synchronized.
SyncEventType An msoSyncEventType value. The status of the synchronization.
MsoSyncEventType can be one of the following msoSyncEventType constants. |
msoSyncEventDownloadInitiated (0) |
msoSyncEventDownloadSucceeded (1) |
msoSyncEventDownloadFailed (2) |
msoSyncEventUploadInitiated (3) |
msoSyncEventUploadSucceeded (4) |
msoSyncEventUploadFailed (5) |
msoSyncEventDownloadNoChange (6) |
msoSyncEventOffline (7) |
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