#1
|
||||
|
||||
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 ActiveDocument.TrackRevisions = Not ActiveDocument.TrackRevisions What command can I use to always turn it off? |
#2
|
||||
|
||||
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 [Fmr MS MVP - Word] |
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 | 0 | 01-16-2010 02:42 PM |
Need to reset default document | Danny Jo | Word | 1 | 07-06-2009 10:24 AM |
Reset on error | kiwichico | Word VBA | 0 | 09-23-2008 08:15 PM |