Método Sync.ResolveConflict (Office)

Resolve conflitos entre as cópias local e do servidor de um documento compartilhado.

Sintaxe

expressão. ResolveConflict (SyncConflictResolution)

expressão Uma variável que representa um objeto de Sincronização .

Parâmetros

Comentários

Use o método ResolveConflict para resolver diferenças entre a cópia local do documento ativo e a cópia do servidor. Use a opção msoSyncConflictMerge (não disponível para uma pasta de trabalho do Microsoft Excel) para mesclar as alterações de cada documento em outra. Substitua a cópia do servidor por alterações locais usando a opção msoSyncConflictClientWins ou substitui a cópia local pela cópia do servidor alterada usando a opção msoSyncConflictServerWins.

A opção msoSyncConflictMerge mescla alterações feitas na cópia do servidor para a cópia local, mas não resolve o conflito. Para resolve o conflito com as alterações intercaladas vencedoras, tem de guardar o documento ativo após intercalar as alterações e, em seguida, chamar novamente o método ResolveConflict com a opção msoSyncConflictClientWins.

O método ResolveConflict pode encontrar uma condição de conflito, se o cliente não está ciente das alterações recentes na cópia do servidor do documento compartilhado. Chame o método GetUpdate antes de chamar ResolveConflict para atualizar o status da cópia do servidor e detectar um possível conflito.

O método ResolveConflict indica um erro em tempo de execução se o documento local possui alterações não salvas ou quando não há conflitos entre 2 cópias do documento.

Nem todos os problemas de sincronização de documento geram erros interceptáveis de tempo de execução. Depois de executar uma operação com o objeto Sincronizar, recomendamos que marcar a propriedade Estado; se a propriedade Estado for msoSyncStatusError, marcar a propriedade ErrorType para obter informações adicionais sobre o tipo de erro ocorrido.

Exemplo

O exemplo a seguir tenta resolver um conflito mesclando alterações entre as cópias local e do servidor do documento ativo.

    Dim objSync As Office.Sync 
    Dim strStatus As String 
    Set objSync = ActiveDocument.Sync 
    If objSync.Status = msoSyncStatusConflict Then 
        objSync.ResolveConflict msoSyncConflictMerge 
        ActiveDocument.Save 
        objSync.ResolveConflict msoSyncConflictClientWins 
        strStatus = "Conflict resolved by merging changes." 
        MsgBox strStatus, vbInformation + vbOKOnly, "Sync Information" 
    End If 
    Set objSync = Nothing 

Confira também

• Sincronizar membros do objeto

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.