Accept all changes "word"

[ajit]

Hi,

I am using this script by 'Water' to track revisions in MSword.

Now I want to accept these changes so that 'corrections' are not shown in the document.

Please help

Regards

Ajit

#include <Word.au3>
$oWordApp = _WordCreate (@ScriptDir & "\Test.doc")
$oDoc = _WordDocGetCollection ($oWordApp, 0)
$oDoc.TrackRevisions = True
sleep(5000)
; now i want to accept all changes

[water]

Do you want to accept all changes or do you want to display the document without markup?

[ajit]

@water,

Thanks for the reply.

I want to accept all changes.

Regards,

Ajit

[water]

To accept all revisions use:

$oDoc.AcceptAllRevisions()

[ajit]

@water,

Thanks very much

Regards,

Ajit

[water]