Método Document.RejectAllRevisionsShown (Word)Document.RejectAllRevisionsShown method (Word)

Rejeita todas as revisões em um documento que estejam visíveis na tela.Rejects all revisions in a document that are displayed on the screen.

SintaxeSyntax

expression.expression. RejectAllRevisionsShown

expression é obrigatório.expression Required. Uma variável que representa um objeto 'documento'.A variable that represents a 'Document' object.

ExemploExample

Este exemplo oculta revisões feitas por Jeff Smith e rejeita todas as revisões restantes que estejam visíveis.This example hides revisions made by Jeff Smith and rejects all remaining revisions that are displayed.

Sub RejectAllChanges() 
 Dim rev As Reviewer 
 With ActiveWindow.View 
 'Show all revisions in the document 
 .ShowRevisionsAndComments = True 
 .ShowFormatChanges = True 
 .ShowInsertionsAndDeletions = True 
 
 For Each rev In .Reviewers 
 rev.Visible = True 
 Next 
 
 'Hide revisions made by "Jeff Smith" 
 .Reviewers(Index:="Jeff Smith").Visible = False 
 End With 
 
 'Reject all revisions displayed in the active view 
 ActiveDocument.RejectAllRevisionsShown 
End Sub

Ver tambémSee also

Objeto DocumentDocument Object