Método Sync.ResolveConflict (Office)
Resolve conflitos entre as cópias local e do servidor de um documento compartilhado.
Observação
A partir do Microsoft Office 2010, este objeto ou membro foi preterido e não deve ser usado.
Sintaxe
expressão. ResolveConflict (SyncConflictResolution)
Expressão Uma variável que representa um objeto Sync .
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
SyncConflictResolution | Obrigatório | MsoSyncConflictResolutionType | Especifica como os conflitos devem ser resolvidos. |
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 resolver o conflito com as alterações mescladas vencedoras, você deve salvar o documento ativo após a mesclagem de alterações e chamar o método ResolveConflict novamente 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 usando o objeto Sync , é uma boa ideia verificar a propriedade Status ; se a propriedade Status for msoSyncStatusError, verifique a propriedade ErrorType para obter informações adicionais sobre o tipo de erro que ocorreu.
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
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.