Microsoft Office Forums

Go Back   Microsoft Office Forums > Microsoft Word > Word VBA

Reply
 
LinkBack Thread Tools Display Modes
  #1  
Old 08-02-2012, 01:50 PM
Jennifer Murphy Jennifer Murphy is offline Windows XP Office 2007
Competent Performer
 
Join Date: Aug 2011
Posts: 178
Jennifer Murphy is on a distinguished road
Default Macro to reset settings

Several inconsiderate programs, such as Acrobat and some PDF converters, change various Word settings and do not restore them. I am trying to write a macro to restore my settings the way I want them.

Using the recorder, I got this code, which seems to work. I have included the opposite settings as comments in case I change my mind.

Can anyone improve on this?
Code:
Sub MyStdSettings()
 
' Turn picture placeholders off (False)
' ActiveWindow.View.ShowPicturePlaceHolders = True
ActiveWindow.View.ShowPicturePlaceHolders = False
 
' Always show field shading
' ActiveWindow.View.FieldShading = wdFieldShadingNever
ActiveWindow.View.FieldShading = wdFieldShadingAlways
' ActiveWindow.View.FieldShading = wdFieldShadingWhenSelected
 
' Clear all formatting options
Selection.Find.ClearFormatting
 
' Show text boundaries
' ActiveWindow.View.ShowTextBoundaries = False
ActiveWindow.View.ShowTextBoundaries = True
 
End Sub
Then I remembered that I seem to turn tracking on by mistake and wanted to add that to the macro. But no matter whether I use Alt+T or the ribbon, the command the recorder stores in the macro is the same for turning tracking on or off:

ActiveDocument.TrackRevisions = Not ActiveDocument.TrackRevisions

What command can I use to always turn it off?
Reply With Quote
  #2  
Old 08-02-2012, 04:12 PM
macropod's Avatar
macropod macropod is online now Windows 7 64bit Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 16,666
macropod is a splendid one to beholdmacropod is a splendid one to beholdmacropod is a splendid one to beholdmacropod is a splendid one to beholdmacropod is a splendid one to beholdmacropod is a splendid one to beholdmacropod is a splendid one to behold
Default

Hi Jennifer,

I've never known an Addin to change any of those settings, though I accept YMMV.

To disable track changes, use:
ActiveDocument.TrackRevisions = False

What I've found you're more likely to end up with is a bunch of custom Styles being added to a document created via a PDF/OCR conversion. You could use a macro to delete all Styles that aren't found in, say, Normal.dot, but that would result in any content in the unwanted custom Styles being converted to Normal Style with the consequential loss of formatting.
__________________
Cheers,
Paul Edstein
[MS MVP - Word]
Reply With Quote
Reply

Thread Tools
Display Modes


Similar Threads
Thread Thread Starter Forum Replies Last Post
Reset Animations debraholloway PowerPoint 0 07-14-2011 09:22 PM
Reset start page? markg2 Excel 2 04-18-2010 06:54 AM
How To Reset The Defaults Settings Mixman77 Office 1 01-29-2010 04:43 PM
Need to reset default document Danny Jo Word 2 07-06-2009 10:24 AM
Reset on error kiwichico Word 0 09-23-2008 08:15 PM


All times are GMT -7. The time now is 04:19 PM.


Powered by vBulletin® Version 3.8.1
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
MSOfficeForums.com is not affiliated with Microsoft