Registrations are now open. Join us today!
There is still a lot of work to do on the wiki yet! More information about editing can be found here.
Already have an account?

Microsoft KB Archive/106315

From BetaArchive Wiki

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 :


Last Reviewed: November 4, 2000
© 2001 Microsoft Corporation. All rights reserved. Terms of Use.