Document.EndReview (Word)

Terminates a review of a file that has been sent for review using the SendForReview method or that has been automatically placed in a review cycle by sending a document to another user in an email message.

When executed, the EndReview method displays a message asking the user whether to end the review.

Sub EndDocRev() 
 ActiveDocument.EndReview 
End Sub