

New or revised text is underlined, and deleted text appears with a line through it.

Text changes appear in a different color than other text. MyRange.Previous(unit:=wdWord, Count:=1).HighlightColorIndex = wdYellow When Track Changes is turned on, Word uses a unique color to mark the changes made by each author.
MS WORD TRACK CHANGES CODE
This is the modified code I am using to help with our documents in case anyone else wants to use it: TempState = ActiveDocument.TrackRevisionsįor Each Change In ActiveDocument.RevisionsĪctiveDocument.TrackRevisions = tempState ' to not accept all track changes and change highlight colour to pink ' Adapted by Rhonda Bracey, CyberText Consulting Pty Ltd, , If you intend using this macro, copy and paste it - some of the lines may go off the page and you’ll miss this information if you type it.
MS WORD TRACK CHANGES FULL
Full credit goes to the macro author ‘nixda’. Here’s my version of that macro in case it ever disappears from the intertubes at that website. Meantime, I modified the first macro to NOT accept all the track changes and to change the highlight colour to pink instead of the dark green. I ‘killed’ Word and decided to only go back to that one if I couldn’t make the modifications I wanted to the first one. Whatever, it had stopped Word and I had ‘not responding’ in the title bar.

The second was either still going after an hour, or had hung. I tested them both on an 80p Word document with some 1450 revisions - the first one worked well and quickly (less than 1 minute), but accepted all my track changes and applied a dark green highlight, which I found hard to read.
