WordBasic Examples: InsertSectionBreak/PageBreak/ColumnBreakLast reviewed: July 30, 1997Article ID: Q106198 |
The information in this article applies to:
SUMMARYThis article contains an example that demonstrates the use of the following WordBasic statements or functions:
InsertSectionBreak InsertPageBreak InsertColumnBreakThis article supplements the information in online Help. To open this Help topic, choose Contents from the Help menu and then choose the "Programming with Microsoft Word" topic. WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS ARTICLE IS AT YOUR OWN RISK. Microsoft provides this macro code "as is" without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose.
InsertSectionBreak
SyntaxInsertSectionBreak
Example
Sub MAINFileNewDefault ViewPage For count = 1 To 50 Insert "This is a test." InsertParaNext count StartOfDocument LineDown 15 InsertSectionBreak LineDown 15 InsertSectionBreak LineUp 5 WindowArrangeAll FilePageSetup .TopMargin = "1" + Chr$(34), .BottomMargin = "1" + Chr$(34), .LeftMargin = "2.75" + Chr$(34), .RightMargin = "2.75" + Chr$(34) End Sub InsertPageBreak
SyntaxInsertPageBreak
Example
Sub MAINFileNewDefault For count = 1 To 5 Insert "This is a test of page breaks." InsertPageBreakNext count Insert "This text should be on page 6" End Sub InsertColumnBreak
SyntaxInsertColumnBreak
Example
Sub MAINFileNewDefault ViewPage FormatColumns .Columns = "2" For count = 1 To 50 Insert "This is a test." InsertParaNext count StartOfDocument LineDown 25 InsertColumnBreak End SubKbcategory: kbusage kbmacro KBSubcategory: kbmacroexample |
Additional query words: 6.0 winword word6 6.0a 6.0c 7.0 word95
© 1998 Microsoft Corporation. All rights reserved. Terms of Use. |