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

[xluser2007]

Tried:

[vba]Sub Print_pg5_pg6_all_sections_v2()

Dim lngSectionCounter As Long

For lngSectionCounter = 1 To ActiveDocument.Sections.Count

ActiveDocument.ActiveWindow.PrintOut Range:=wdPrintFromTo, From:="p5s" & lngSectionCounter, To:="p6s" & lngSectionCounter

Next lngSectionCounter

End Sub[/vba]
This works, but doesn't preserve the order of the specific sections, unsure why. Any ideas (for both codes posted)?