Set Layout Options Word vba

jec1 · #1 09-17-2021, 02:50 PM

Hi everyone, I use a File Options macro to set Word Options. Any ideas welcome.

Think I have my answer use Set Compatibility Options works for the below options:

I currently set the other Options I require using:
Sub FileOptions_User2()
Application.ScreenUpdating = False
Call ToolsOptionsView
Call ToolsOptionsEdit
Call ToolsOptionsSave
Call ToolsOptionsTrackChanges
Call ToolsAutocorrect
End Sub

I can't figure out how to call the layout options in VBA. Has anyone done the Layout options with VBA?

Sub ToolsLayout()
With .Options
.wdSuppressBottomSpacings = False
.wdExpandShiftReturn
.wdSuppressTopSpacing -False
.wdNoSpaceForUL = False
.wdSuppressSpBfAfterPgBrk = False
End With
End Sub

Thank you.

Peterson · #2 09-18-2021, 11:09 AM

Try this:

Code:

Sub ToolsLayout()
     With ActiveDocument
    
        .Compatibility(wdSuppressBottomSpacing) = False
        .Compatibility(wdExpandShiftReturn) = False
        .Compatibility(wdSuppressTopSpacing) = False
        .Compatibility(wdNoSpaceForUL) = False
        .Compatibility(wdSuppressSpBfAfterPgBrk) = False
        
    End With
End Sub

jec1 · #3 09-18-2021, 05:20 PM

Thank you Peterson.

Charles Kenyon · #4 09-22-2021, 10:28 AM

General hammer and tongs method of setting options:
Record a macro setting those options.
Then clean it up in the vba editor to remove unwanted parts and redundancies.

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Word Compatibility Options	ldoodle	Word VBA	2	11-01-2018 01:20 PM
Why is my document lose its layout when saving from MS Word 2010 to MS Word 2016 Format	qadeerahmed	Word	1	07-17-2017 04:59 AM
New Master doesn't show up in my layout options	LadyBug679	PowerPoint	0	02-17-2017 10:44 AM
Word Not Saving Options	BriMercer	Word	4	11-10-2009 11:00 AM
Word options	ehrenben	Word	1	04-29-2009 02:27 PM