Set Default "view" to "Final" vs. "Final Showing Markup"

This seems to be the solution I have been looking for, but I am not familiar with creating Macros. Can you provide step-by-step instructions for creating this Macro?

"Ian Baird [MS]" wrote:

Hi Tracy

Final Showing Markup is the default view for Word. This is simply the way
Word is designed. You can however use a macro to set it to Final.

'WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS EXAMPLE IS 'AT YOUR
OWN RISK.
Microsoft provides this macro code "as is" without warranty of 'any kind,
either
express or implied, including but not limited to the implied warranties of
'merchantability and/or fitness for a particular purpose.


Sub autoOpen()

With ActiveWindow.View

.ShowRevisionsAndComments = False

.RevisionsView = wdRevisionsViewFinal

End With



End Sub

You could also put the following code in the template's Document_New event:

'WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS EXAMPLE IS 'AT YOUR
OWN RISK.
Microsoft provides this macro code "as is" without warranty of 'any kind,
either
express or implied, including but not limited to the implied warranties of
'merchantability and/or fitness for a particular purpose.

Private Sub Document_New()
With ActiveWindow.View
.ShowRevisionsAndComments = False
.RevisionsView = wdRevisionsViewFinal
End With
End Sub

This could be done globally with a COM Add-in. However, it must be
installed on each user's machine.

Regards,

Ian Baird
Microsoft PSS

This posting is provided 'AS IS' with no warranties and confers no rights.

The macro has already been created for you. All you have to do is install
it. See http://www.gmayor.com/installing_macro.htm

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
Word MVP FAQ site: http://word.mvps.org
Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

"John Voldal" John wrote in message
...
This seems to be the solution I have been looking for, but I am not
familiar with creating Macros. Can you provide step-by-step instructions for
creating this Macro?

"Ian Baird [MS]" wrote:

Hi Tracy

Final Showing Markup is the default view for Word. This is simply the
way
Word is designed. You can however use a macro to set it to Final.

'WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS EXAMPLE IS 'AT
YOUR
OWN RISK.
Microsoft provides this macro code "as is" without warranty of 'any
kind,
either
express or implied, including but not limited to the implied warranties
of
'merchantability and/or fitness for a particular purpose.


Sub autoOpen()

With ActiveWindow.View

.ShowRevisionsAndComments = False

.RevisionsView = wdRevisionsViewFinal

End With



End Sub

You could also put the following code in the template's Document_New
event:

'WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS EXAMPLE IS 'AT
YOUR
OWN RISK.
Microsoft provides this macro code "as is" without warranty of 'any
kind,
either
express or implied, including but not limited to the implied warranties
of
'merchantability and/or fitness for a particular purpose.

Private Sub Document_New()
With ActiveWindow.View
.ShowRevisionsAndComments = False
.RevisionsView = wdRevisionsViewFinal
End With
End Sub

This could be done globally with a COM Add-in. However, it must be
installed on each user's machine.

Regards,

Ian Baird
Microsoft PSS

This posting is provided 'AS IS' with no warranties and confers no
rights.