Change Bars

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

steve klatzkin - 06 Nov 2003 14:07 GMT

In our effort to exercise the various features used by
the technical staff and DM for publishing, we discovered
that the track changes feature has been altered
significantly.

Previously, any documents that were in Word were revised
using the track changes feature to identify changes from
the previous release. DM selected change bars only for
publishing so that additions were not highlighted
anddeletions were not displayed in the published item.
Word 2002 does not allow us to suppress the view of
deletions. The only mechanism available to remove
deletions is to accept all changes, thus losing the
ability to mark the changes with a change bar.

Reply to this Message

Jay Freedman - 06 Nov 2003 16:04 GMT

Hi, Steve,

In Word 2002, the field for deletion formatting was removed from the Track
Changes option page -- we don't know why, but it was obviously a mistake. It
returned in Word 2003.

Fortunately, the formatting can still be set from a macro. Put this macro
into the template(s) attached to the documents, and add a toolbar button
pointing to the macro. It will toggle between [strikethrough deletions, blue
insertions] and [hidden deletions, auto insertions], without affecting the
change bars.

Sub ToggleTrackChangesDisplay()
With Options
If .DeletedTextMark = wdDeletedTextMarkHidden Then
.DeletedTextMark = wdDeletedTextMarkStrikeThrough
.InsertedTextMark = wdInsertedTextMarkColorOnly
.InsertedTextColor = wdBlue
Else
.DeletedTextMark = wdDeletedTextMarkHidden
.InsertedTextMark = wdInsertedTextMarkNone
.InsertedTextColor = wdAuto
End If
End With
End Sub

Signature

Regards,
Jay Freedman
Microsoft Word MVP FAQ: http://www.mvps.org/word

> In our effort to exercise the various features used by
> the technical staff and DM for publishing, we discovered
[quoted text clipped - 10 lines]
> deletions is to accept all changes, thus losing the
> ability to mark the changes with a change bar.

Reply to this Message

omar0117 - 05 Feb 2004 03:15 GMT

I tried applying the macro and it makes the document look as expected o
the screen. However, I am unable to print the document following th
application of the macro - word hangs.

Any suggestions

Reply to this Message

Greg Maxey - 06 Nov 2003 16:55 GMT

Steven

If all you want is the change mark in the margin you can
run the following macro and print showing markup:

Sub TrackChanges()

With Application.Options
.RevisedLinesMark = wdRevisedLinesMarkOutsideBorder
.RevisedLinesColor = wdAuto
' .DeletedTextMark = wdDeletedTextMarkCaret
' .DeletedTextMark = wdDeletedTextMarkStrikeThrough
.DeletedTextMark = wdDeletedTextMarkNone
' .DeletedTextColor = wdRed
' .DeletedTextMark = wdDeletedTextMarkHidden
' .InsertedTextMark = wdInsertedTextMarkItalic
' .InsertedTextMark = wdInsertedTextMarkNone
' .InsertedTextColor = wdBlue
' .InsertedTextMark = wdInsertedTextMarkUnderline
.InsertedTextMark = wdInsertedTextMarkColorOnly
.InsertedTextColor = wdAuto
' .RevisedPropertiesMark =
wdRevisedPropertiesMarkColorOnly
' .RevisedPropertiesColor = wdAuto
' .RevisedPropertiesMark =
wdRevisedPropertiesMarkColorOnly
' .RevisedPropertiesColor = wdViolet

End With
End Sub

>-----Original Message-----
> In our effort to exercise the various features used by
[quoted text clipped - 12 lines]
>ability to mark the changes with a change bar.
>.

Reply to this Message