Thread: How to move Section 1.0 (Heading 1) into third page in vba word
View Single Post
 
Old 02-16-2022, 07:15 PM
Guessed's Avatar
Guessed Guessed is offline Windows 10 Office 2016
Expert
  
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 4,176
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default
You could do either:
This one sets a style change so all heading 1's start a new page
ActiveDocument.Styles(wdStyleHeading1).ParagraphFo rmat.PageBreakBefore = True

This one just changes the first heading in the document
ActiveDocument.Range.GoTo(What:=wdGoToHeading, Which:=wdGoToFirst ).ParagraphFormat.PageBreakBefore = True
__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia
Reply With Quote