Q106315 - WordBasic Examples: NormalFontPosition, NormalFontSpacing

WordBasic Examples: NormalFontPosition, NormalFontSpacing

Q106315

The information in this article applies to:

Microsoft Word for Windows, versions 6.0, 6.0a, 6.0c
Microsoft Word for Windows, version 7.0

SUMMARY

This article contains an example that demonstrates the use of the following WordBasic statements or functions:


   NormalFontPosition
 
   NormalFontSpacing

This 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.

NormalFontPosition

NormalFontSpacing

Syntax


NormalFontPosition
NormalFontSpacing

Example

This example types sample text into the document, then adds spacing and subscripting to the text. It then resets the text using the NormalFontPosition and NormalFontSpacing commands.


Sub MAIN
     Insert "This is a Test"
     MsgBox "Press OK to change the spacing and position of this text"
     StartOfLine 1
     FormatFont .Position = - 150, .Spacing = 200
     EndOfLine
     MsgBox "Press OK to reset the text back to normal"
     StartOfLine 1
     NormalFontPosition
     NormalFontSpacing
     EndOfLine
End Sub

Additional query words: 6.0 winword word6 7.0 word95 word7

Keywords : kbmacroexample
Issue type :
Technology :