Track Changes Line Mark

[gene baggs]

The line mark disappears after track change revisions are
accepted. Is there a way to keep the line (revision) mark
after accepting changes without manually entering each
mark?

 

[Margaret Aldis]

Hi Gene

You need to leave the revisions and change bar formatting in place, but use
no formatting for the insertions, and hidden text formatting for the
deletions.

In Word 2002 you can't change the formatting for the deletions from the
Options dialog. The rest of the settings can be made 'by hand' (set change
bar printing and inserted
text formatting as in 97, and print without balloons), but the following
macro will do the lot:

Sub ShowChangebarsOnly()
With Options
' no text marking when printed
.InsertedTextMark = wdInsertedTextMarkNone
.InsertedTextColor = wdAuto
.DeletedTextMark = wdDeletedTextMarkHidden
.DeletedTextColor = wdByAuthor
.RevisedPropertiesMark = wdRevisedPropertiesMarkNone
.RevisedPropertiesColor = wdAuto
' print change bars
.RevisedLinesMark = wdRevisedLinesMarkRightBorder
.RevisedLinesColor = wdAuto
End With
' revisions visible and printing, no balloons
With ActiveWindow.View
.RevisionsMode = wdInLineRevisions
.ShowRevisionsAndComments = True
.ShowFormatChanges = False
.RevisionsView = wdRevisionsViewFinal
End With
End Sub