Section Break Orientation

[Vinay]

Hi,

I am using the following statement in a loop to insert
some text in a document.

.ActiveDocument.range.insertafter("Some Text" & vbCrLf)

In this loop depending on the range and text and length,
I want to give a page break in such a way that next page
text comes in Landscape mode.

Can someone suggest, how do I achieve this
functionality ?

Regards

Vinay

 

[Cindy M -WordMVP-]

Hi Vinay,

I am using the following statement in a loop to insert
some text in a document.

.ActiveDocument.range.insertafter("Some Text" & vbCrLf)

In this loop depending on the range and text and length,
I want to give a page break in such a way that next page
text comes in Landscape mode.

Can someone suggest, how do I achieve this
functionality ?

Instead of inserting a page break, use

Dim sec as Word.Section

Set sec = ActiveDocument.Sections.Add _
Start:=wdSectionNewPage
sec.PageSetup.Orientation = wdOrientLandscape

Cindy Meister
INTER-Solutions, Switzerland
http://homepage.swissonline.ch/cindymeister (last update
Sep 30 2003)
http://www.mvps.org/word

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