WD: WordBasic Examples: Toggle CommandsLast reviewed: November 17, 1997Article ID: Q106334 |
The information in this article applies to:
SUMMARYThis article contains a sample macro that demonstrates the use of the following WordBasic statements or functions:
ToggleFull ToggleMainTextLayer TogglePortraitThis article supplements the information in online Help. To open this Help topic in Word for Windows, click Contents on the Help menu and then choose the "Programming with Microsoft Word" topic. In Word for the Macintosh, click the Help icon, select Microsoft Word Help and choose the "Programming with Microsoft Word" topic.
MORE INFORMATION
ToggleFullSyntax: ToggleFull Example: This sample macro allows you to see a document on screen without rulers, toolbars, or other screen elements.
Sub MAIN If SelInfo(27) = - 1 Then FileNewDefault MsgBox "Press OK to Toggle Full Screen" ToggleFull MsgBox "Press OK to Toggle Back" ToggleFull End Sub ToggleMainTextLayerSyntax: ToggleMainTextLayer Example: This sample macro toggles the display of the text in the document layer when headers and footers are displayed. If the selection is not within a header or footer, an error occurs.
Sub MAIN If SelInfo(27) = - 1 Then FileNewDefault Insert "This text is visible on the main text layer" ViewHeader MsgBox "Press OK to switch to the main text layer" ToggleMainTextLayer End Sub TogglePortrait
SyntaxTogglePortrait
ExampleThis sample macro switches the selected sections between portrait and landscape page orientations. If the selected sections have different page orientations, an error occurs.
Sub MAIN If SelInfo(27) = - 1 Then FileNewDefault ViewPage ViewZoom .FullPage TogglePortrait For Count = 1 To 300 '...Pause Next count TogglePortrait End Sub |
Additional query words:
© 1998 Microsoft Corporation. All rights reserved. Terms of Use. |