Mega Code Archive

 
Categories / VisualBasic Script / Excel
 

For an odd-page break

Sub break()     ActiveDocument.Paragraphs(2).Range.InsertBreak Type:=wdSectionBreakOddPage End Sub