OLE Automation: Specifying a Command Button from Visual Basic

 Last reviewed: February 6, 1998
Article ID: Q105581
The information in this article applies to:
  • Microsoft Word for Windows, versions 6.0, 6.0a, 6.0c
  • Microsoft Word for Windows 95, version 7.0

SUMMARY

Using a Microsoft Visual Basic application, it is possible to run a WordBasic instruction with command button parameters. Boolean "true" and "false" values are used to specify command buttons.

For example: 

   ToolsMacro .Name = "MacroName", .Run
To use this instruction in a Visual Basic procedure, you would write: 

   WordObj.ToolsMacro "MacroName", True
The "True" value is the Visual Basic equivalent to choosing/specifying the Run command button. You can use the "False" value or omit a command button argument to not choose a command button. When calling WordBasic instructions from Visual Basic you must identify WordBasic arguments by position using commas as placeholders.

The following Visual Basic procedure opens the Test macro for editing (the equivalent of ToolsMacro .Name = "Test", .Edit).

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. 

Sub Command1_Click ()
Dim WordObj As Object Set WordObj = CreateObject("Word.Basic") WordObj.ToolsMacro "Test", , True 
End Sub
If you remove the comma before True, the instruction will run the Test macro. For example: 

   WordObj.ToolsMacro "Test", True

KBCategory: kbmacro
KBSubcategory:
Additional query words: 6.0 ole automation word basic word6
6.0a 6.0c 7.0 word95 word7 winword object position visual basic true

Keywords : kbole kbmacro
Version : 6.0 6.0a 6.0c 7.0
Platform : WINDOWS

THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY.

Last reviewed: February 6, 1998
© 1998 Microsoft Corporation. All rights reserved. Terms of Use.