Track Changes

[Dan S]

When using track changes, I need to hide deleted text, but still allow change lines to show. When unchecking "Insertions and Deletions" under the Show button on the Reviewing Tool Bar, both deleted text and change lines are no longer shown. Showing change lines without deleted text can be easily done in Word 97. How can this be done in Word 2002?

 

[Margaret Aldis]

When using track changes, I need to hide deleted text, but still allow

change lines to show. When unchecking "Insertions and Deletions" under the
Show button on the Reviewing Tool Bar, both deleted text and change lines
are no longer shown. Showing change lines without deleted text can be easily
done in Word 97. How can this be done in Word 2002?

You need to use VBA to set the deleted text to hidden, as this option was
removed from the User Interface in Word 2002. 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