Partilhar via


Propriedade Sync.LastSyncTime (Office)

Obtém a data e a hora em que a cópia local do documento ativo foi sincronizada com a cópia do servidor pela última vez. Somente leitura.

Observação

A partir do Microsoft Office 2010, este objeto ou membro foi preterido e não deve ser usado.

Sintaxe

expressão. LastSyncTime

Expressão Uma variável que representa um objeto Sync .

Comentários

Use a propriedade LastSyncTime para determinar quanto tempo decorrido desde que a cópia local do documento ativo última foi sincronizada com a cópia do servidor. Verifique a propriedade Status para determinar se a cópia local e a cópia do servidor estão fora de sincronia.

Se o documento ativo não estiver configurado para sincronização entre a cópia local e a cópia do servidor, a propriedade LastSyncTime gera um erro em tempo de execução.

Exemplo

O exemplo a seguir alerta o usuário e exibe o status de sincronia caso tenha passado mais de 24 horas desde 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 

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.