Sync-Objekt (Office)
Die Sync -Eigenschaft des Document -Objekts in Microsoft Word, des Workbook -Objekts in Microsoft Excel und des Presentation -Objekts in Microsoft PowerPoint gibt ein Sync -Objekt zurück.
Hinweis
Ab Microsoft Office 2010 ist dieses Objekt oder Element veraltet und sollte nicht verwendet werden.
Verwenden Sie das Sync-Objekt , um die Synchronisierung der lokalen Und Serverkopien eines freigegebenen Dokuments zu verwalten, das auf einer SharePoint-Website gespeichert ist. Die Status -Eigenschaft gibt wichtige Informationen zu den aktuellen Status der Synchronisierung zurück. Verwenden Sie die GetUpdate -Methode, um den Synchronisierungsstatus zu aktualisieren. Verwenden Sie die Eigenschaften LastSyncTime, ErrorType und WorkspaceLastChangedBy, um zusätzliche Informationen zurückzugeben.
Weitere Informationen zu den Unterschieden und Konflikten, die zwischen lokalen Kopien und Serverkopien von freigegebenen Dokumenten bestehen können, finden Sie in der Status-Eigenschaft .
Verwenden der PutUpdate -Methode zum Speichern von lokaler Änderungen an den Server. Schließen Sie und erneut öffnen Sie das Dokument, um vom Server die neueste Version abzurufen, wenn keine lokalen Änderungen vorgenommen wurden. Verwenden Sie die ResolveConflict -Methode, um Unterschiede zwischen der lokalen Kopie und der Serverkopie zu beheben oder die OpenVersion -Methode, um eine andere Version zusammen mit der aktuell geöffneten lokalen Version des Dokuments zu öffnen.
Die Methoden GetUpdate, PutUpdate und ResolveConflict des Sync-Objekts geben keine status Codes zurück, da sie ihre Aufgaben asynchron ausführen. Das Sync -Objekt bietet wichtige Statusinformationen durch ein einzelnes Ereignis, das der Entwickler mithilfe der folgenden anwendungsspezifischen Ereignisse zugreifen kann:
In Word über das Sync-Ereignis des Document-Objekts oder das DocumentSync-Ereignis des Application-Objekts.
In Excel über das Sync-Ereignis des Workbook-Objekts oder das WorkbookSync-Ereignis des Application-Objekts .
In Microsoft PowerPoint über das PresentationSync-Ereignis des Application-Objekts .
Das oben beschriebene Sync -Ereignis gibt einen MsoSyncEventType -Wert zurück.
Das Sync -Objektmodell ist verfügbar, ob Freigabe und Synchronisierung aktiviert oder im aktiven Dokument deaktiviert sind. Die Sync -Eigenschaft der Objekte Document, Workbook und Presentation gibt keine zurück Nothing zurück, wenn im aktive Dokument nicht freigegeben ist oder Synchronisierung ist nicht aktiviert. Verwenden Sie die Status -Eigenschaft, um zu bestimmen, ob das Dokument freigegeben ist und ob die Synchronisierung aktiviert ist.
Nicht alle Dokumentsynchronisierungsprobleme lösen abfangbare Laufzeitfehler aus. Nachdem Sie die Methoden des Sync-Objekts verwendet haben, sollten Sie die Status-Eigenschaft überprüfen. Wenn die Status-EigenschaftmsoSyncStatusError ist, überprüfen Sie die ErrorType-Eigenschaft auf zusätzliche Informationen zum Typ des aufgetretenen Fehlers.
In vielen Fällen wird die beste Möglichkeit zum Beheben eines Fehlers die GetUpdate -Methode aufzurufen. Beispielsweise wird Wenn ein Aufruf von PutUpdate Ergebnisse in ein Fehlerzustand, ein Anruf an GetUpdate den Status msoSyncStatusLocalChanges zurückgesetzt.
Das folgende Beispiel zeigt verschiedene Methoden des Sync -Objekts basierend auf dem Status des aktiven Dokuments.
Dim objSync As Office.Sync
Dim strStatus As String
Set objSync = ActiveDocument.Sync
If objSync.Status > msoSyncStatusNoSharedWorkspace Then
Select Case objSync.Status
Case msoSyncStatusConflict
objSync.ResolveConflict msoSyncConflictMerge
ActiveDocument.Save
objSync.ResolveConflict msoSyncConflictClientWins
strStatus = "Conflict resolved by merging changes."
Case msoSyncStatusError
strStatus = "Last error type: " & objSync.ErrorType
Case msoSyncStatusLatest
strStatus = "Document copies already in sync."
Case msoSyncStatusLocalChanges
objSync.PutUpdate
strStatus = "Local changes saved to server."
Case msoSyncStatusNewerAvailable
objSync.GetUpdate
strStatus = "Local copy updated from server."
Case msoSyncStatusSuspended
objSync.Unsuspend
strStatus = "Synchronization resumed."
End Select
Else
strStatus = "Not a shared workspace document."
End If
MsgBox strStatus, vbInformation + vbOKOnly, "Sync Information"
Set objSync = Nothing
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.