LastSyncTime Property

Microsoft Office Visual Basic

LastSyncTime Property

Returns the date and time when the local copy of the active document was last synchronized with the server copy. Read-only Variant.

expression.LastSyncTime

expression    Required. An expression that returns a Sync object.

Remarks

Use the LastSyncTime property to determine how much time has elapsed since the local copy of the active document was last synchronized with the server copy. Check the Status property to determine whether the local copy and the server copy are out of sync.

If the active document is not configured for synchronization between the local copy and the server copy, the LastSyncTime property raises a run-time error.

Example

The following example alerts the user and displays the sync status if more than 24 hours have elapsed since the LastSyncTime.

        Dim objSync As Office.Sync
    Dim dtmLastSync As Date
    Dim strStatus As String
    Set objSync = ActiveDocument.Sync
    dtmLastSync = CDate(objSync.LastSyncTime)
    If DateDiff("h", dtmLastSync, Now) > 24 Then
        strStatus = "Document has not been synced " & _
            " within the last 24 hours." & vbCrLf & _
            "Document status: " & objSync.Status
        MsgBox strStatus, vbInformation + vbOKOnly, "Error Information"
    End If
    Set objSync = Nothing