InsertedTextMark Property Example
This example applies double-underline formatting to inserted text.
Options.InsertedTextMark = wdInsertedTextMarkDoubleUnderline
This example returns the current status of the Mark option under Inserted Text on the Track Changes tab in the Options dialog box.
temp = Options.InsertedTextMark