How to Use OLE Automation with Word 6.0/7.0

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

SUMMARY

This article provides an overview of using OLE Automation with the versions of Word for Windows listed at the beginning of this article.

NOTE: Throughout this article, examples utilizing OLE Automation assume that the following lines of Visual Basic code have been used to initiate the OLE Automation session:

   Dim WBO As Object                       'Declare an object variable
   Set WBO = CreateObject("Word.Basic")    'Set the object pointer

MORE INFORMATION

Word versions 6.x and 7.x can be OLE Automation servers. Word makes available a single object, Word.Basic, allowing you to issue WordBasic commands from another application to control actions in Word. If you wish to use WordBasic to control other applications, you must use DDE.

General Example

The following Visual Basic example creates and uses a WordBasic OLE object:

Sub WordExample ()
   Dim WBO As Object                    'Declare an object variable
   Set WBO = CreateObject("Word.Basic") 'Set the object pointer
   WBO.FileNew                          'Create a new File in Word
   WBO.Bold                             'Make the Font Bold
   WBO.FontSize 24                      'Make the Font 24 point in size
   WBO.CenterPara                       'Center Text on page
   WBO.Insert "Automation's Great!"     'Insert some text
   WBO.FilePrintDefault                 'Print the current document
   WBO.FileClose 2                      'Close file without saving.
   Set WBO = Nothing                    'Clear the object pointer.
End Sub

The Set WBO = Nothing statement exits Word if Word was launched by the CreateObject statement.

OLE Automation cannot invoke the FileExit method of WordBasic. Because OLE Automation cannot start a new instance of Word after the initial instance, OLE Automation assumes that the user started Word and the user is responsible for exiting the application.

Using Named and Positional Arguments

There are generally two ways of sending commands when using OLE Automation, using either Named or Positional arguments. Positional arguments have many drawbacks: all arguments for a command have to be used, the arguments have to be in the proper order, and your code is generally less readable. The following example uses positional arguments:

   WBO.FormatFont ,,,,,,,,,,,,,,,,True  'Format selection as bold.

   WBO.FormatFont Bold:=True            'Format selection as bold.

Many of the WordBasic commands documented in Word's Help or in the Word Developer's Kit do not have the arguments listed in the correct order, because WordBasic itself uses named arguments and isn't particular about the order in which the arguments are used.

Microsoft has made available a file, Position.txt, that lists all the WordBasic commands and their arguments in the correct order. However, you must be sure you are using the correct version of this file. The version in the first and second edition of the Word Developer's Kit is designed for Word 6.x and the Position.txt file included in the third edition of the Word Developer's Kit is designed for Word for Windows version 7.x.

Programmers using Visual Basic 4.0 should use named arguments to avoid concerns about argument positions.

REFERENCES

For additional information, please see the following article(s) in the Microsoft Knowledge Base:

   ARTICLE-ID: Q105534
   TITLE     : OLE: Visual Basic 3.0 Does Not Support Named Arguments

   ARTICLE-ID: Q112733
   TITLE     : POSITION.HLP File for VB OLE Automation w/ Word for Windows

General Syntax for Named Arguments

WordBasic (without using OLE Automation) arguments are preceded with a period. This is how the commands are documented in all references about WordBasic. Consider the following example:

   EditBook .Name="test", .Add

   WBO.EditBookmark Name:="test", Add:=True

Syntax for Using String Functions

The syntax of WordBasic functions that return strings includes a dollar sign ($) to indicate the return type. Visual Basic version 3.0 and other applications, such as Microsoft Access for Windows version 7.0 may require that these functions be enclosed in square brackets ([]). The following example returns the text stored in the bookmark MyBookMark:

   MyVar = WBO.[GetBookMark$]("MyBookMark")  'Return text from bookmark

Using Boolean Arguments

Many WordBasic commands use arguments to specify actions, which usually equate to buttons in a Word dialog box. To use these arguments, you must pass a Boolean value of True. For example, the EditBookmark command has multiple actions you can specify (Add, Delete, and GoTo). In WordBasic, the most commonly used syntax would be:

   EditBookmark .Name="test", .Add

   EditBookmark .Name="test", .Add=True

   WBO.EditBookmark Name:="test", Add:=True

   WBO.EditBookmark "test", , True

Background Processing

Word performs some actions in the background, including printing, auto- saving, and spelling. The background printing option, in particular, can cause problems when using OLE Automation to print from Word. Background printing should be turned off when using OLE Automation.

To turn background printing off, click Options on the Tools menu. Then click the Print tab, and click to clear the checkbox for background printing. Or, you can use the following code to do this through OLE Automation prior to printing:

   WBO.ToolsOptionsPrint Background:=0

CreateObject Fails

The CreateObject function could cause an error under any of the following circumstances: