View Single Post
  #2   Report Post  
Jay Freedman
 
Posts: n/a
Default

Jenn Searls wrote:
My boss has a document that he wants to reformat. He wants to force
each new section onto an odd page as he's duplex printing this
document. He would like to go back and reformat the document so that
regular "Next Page" section breaks are now "Odd Page" section breaks
without having to go back and manually inserting them.


Run this macro:

Sub OddStartSecs()
Dim oSec As Section
For Each oSec In ActiveDocument.Sections
With oSec.PageSetup
If .SectionStart = wdSectionNewPage Then
.SectionStart = wdSectionOddPage
End If
Next oSec
End Sub

See http://www.gmayor.com/installing_macro.htm if necessary.

--
Regards,
Jay Freedman
Microsoft Word MVP FAQ: http://word.mvps.org