Sub finalview() With ActiveWindow.View .ShowInsertionsAndDeletions = Not .ShowInsertionsAndDeletions End With End Sub
I also wanted to make a custom 'Smart Tag List' the easiest way to do this was to simply download this 'Cities Smart Tag List' and edit the entries. This post on the MS web page was pretty hand. I simply replaced the terms after:
<FL:termlist>with my own CSV data. In this case a list of UniProt terms to easily identify the controlled vocabulary in the text of reports. I did also start to play around with the naming and URL parts of the XML, however after several promising edits the whole smart tag list disappeared from the options pane in Word. So I gave up and reverted to a version where I had only changed the main name and the term list as all I really wanted was the in text underlining of the terms.