Changing 'trace changes' to permanent text color?

A

Alexander Kluge

Hello!
Is anyone aware of a way to change the markup fof the 'track/trace changes'
feature into permanent text color?

A pdf converter elsewhere cannot handle the markups of the track changes
feature, therefore I have to code the quality of text (new, deleted, or
unchanged) with permanent text color. Principally, I can do this by hand,
but this is barely feasible with a longer document with lots of changes.

Is there a way to perform this or does a macro exist?

Thank you for any hint.

Regards
Alexander
 
C

Cindy M -WordMVP-

I replied to this same question yesterday. Probably in this
group...

Cindy Meister
 
A

Alexander Kluge

Cindy M -WordMVP- said:
I replied to this same question yesterday. Probably in this
group...

It was in german Word group microsoft.public.de.word. Thank you for that
reply.
You proposed to change the text color by hand or to write a macro.

Indeed, that was the very reason for me to post the question.

Christian Fressdorf posted a makro in microsoft.public.de.word January 20
8:45 am. This macro was exactly what I was looking for, it works perfectly
well:

Sub MarkRevisions()
Dim myRev As Revision
ActiveDocument.TrackRevisions = False
For Each myRev In Selection.Range.Revisions
If myRev.Type = wdRevisionInsert Then
myRev.Range.Font.Color = wdColorRed
myRev.Range.Font.Underline = wdUnderlineSingle
myRev.Accept
ElseIf myRev.Type = wdRevisionDelete Then
myRev.Range.Font.Underline = wdUnderlineWavy
myRev.Range.Font.Color = wdColorBlue
myRev.Reject
End If
Next myRev
End Sub




Regards
Alexander
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top