Track Changes/Markup formatting

[Gotrek]

Is there a way to have makrups only show the black line on
the left column indicating changes and nothing else (for
the text to look like it will in the final copy ithout the
omitted lines and changes)?

 

[Margaret Aldis]

Is there a way to have makrups only show the black line on
the left column indicating changes and nothing else (for
the text to look like it will in the final copy ithout the
omitted lines and changes)?

Hi Gotrek

You need to make the deleted text hidden, and the inserted text unmarked, as
well as showing the change bar (margin line).

Prior to Word 2002 and in Word 2003 you can do this from the
user interface. Since you are posting here I guess you are on Word 2002
where you don't have the option to change the deleted text appearance in the
dialog, and need to do it using the following VBA

Options.DeletedTextMark = wdDeletedTextMarkStrikeThrough

You can enter this in the Visual basic immediate window (Alt - F11,
Ctrl -G). You only need to run it once.

If you need to swap back and forth between a change bar and a full revision
marked format, you'll probably be better off with a pair of macros. This one
will give you change bars only:

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

Hope this helps

 

[Guest]

Perfect Thank-You

-----Original Message-----


Hi Gotrek

You need to make the deleted text hidden, and the inserted text unmarked, as
well as showing the change bar (margin line).

Prior to Word 2002 and in Word 2003 you can do this from the
user interface. Since you are posting here I guess you are on Word 2002
where you don't have the option to change the deleted text appearance in the
dialog, and need to do it using the following VBA

Options.DeletedTextMark = wdDeletedTextMarkStrikeThrough

You can enter this in the Visual basic immediate window (Alt - F11,
Ctrl -G). You only need to run it once.

If you need to swap back and forth between a change bar and a full revision
marked format, you'll probably be better off with a pair of macros. This one
will give you change bars only:

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

Hope this helps

--
Margaret Aldis - Microsoft Word MVP
Syntagma partnership site: http://www.syntagma.co.uk



.