Solved: Print specific pages from ALL sections of a word document

[xluser2007]

A bit of searching and modifying led to the solution.

Here it is for anyone else to benefit from.

[vba]Option Explicit

Sub Print_pg5_pg6_all_sections()

Dim oneSection As Section

For Each oneSection In ActiveDocument.Sections

ActiveDocument.ActiveWindow.PrintOut Range:=wdPrintFromTo, From:="p5s" _
& oneSection.Index, To:="p6s" & oneSection.Index

Next oneSection

End Sub[/vba]

regards,

NOTE: I am not sure why it doesn't print the relevant pages for the sections in the order that they occur in e.g. Section 1 pg5-pg6, Section 2 pg5-pg6, Section 3 pg5-pg6, Section 4 pg5-pg6,.... If anyone could please clarify how to ensure that the the order of sections when printing is preserved, that would be great.