Mega Code Archive

 

Categories / VisualBasic Script / Word

 

Changing the Page Setup

Sub page()     With Documents("yourDoc.doc").PageSetup         .PaperSize = wdPaperLetter         .Orientation = wdOrientPortrait         .TopMargin = 1         .BottomMargin = 1              .LeftMargin = 1         .RightMargin = 1.5         .MirrorMargins = True     End With End Sub