Insert Page Break

[KSH]

I am trying to insert a blank page between page 1 and page 2 on a word
document. Data is being added to it so the length of the document is
unknown, but when I am done I want to insert a blank page between 1 and 2.
The below code will work for paragraphs, but I want to do it based on page
and I can't figure it out. Seems like it should be simple but there is not a
property to set on the range for page like there is for paragraph. There is
pagesetup, but I don't think I want that.

Please help!

This just inserts a blank page at the end of the document.


Set rngCurrent = docword.Content
With rngCurrent
.Collapse Direction:=wdCollapseEnd
.GoTo What:=wdPageBreak, which:=1
.InsertBreak Type:=wdPageBreak

End With

 

[Cindy M.]

Hi =?Utf-8?B?S1NI?=,

I am trying to insert a blank page between page 1 and page 2 on a word
document. Data is being added to it so the length of the document is
unknown, but when I am done I want to insert a blank page between 1 and 2.
The below code will work for paragraphs, but I want to do it based on page
and I can't figure it out. Seems like it should be simple but there is not a
property to set on the range for page like there is for paragraph.

No, there is not. There is no way to tell Word "I want page 2 to be blank" and
have text jump "over" that page, from page 1 to page 3.

Cindy Meister
INTER-Solutions, Switzerland
http://homepage.swissonline.ch/cindymeister (last update Jun 17 2005)
http://www.word.mvps.org

This reply is posted in the Newsgroup; please post any follow question or reply
in the newsgroup and not by e-mail