HOWTO: View Microsoft Word Toolbars Using OLE Control
ID: Q112044
|
The information in this article applies to:
-
Microsoft Visual Basic Standard and Professional Editions for Windows, version 3.0
-
Microsoft Word for Windows, version 6.0
SUMMARY
This article shows by example how to make a Visual Basic program display
Microsoft Word version 6.0 toolbars. It is not possible to display the
toolbars using the OLE control alone, so the following example uses an
OLE object in combination with the OLE control.
MORE INFORMATION
When editing a Microsoft Word document that is in an OLE control, you
may find it helpful to use the Microsoft Word toolbars. However, if you
close all your toolbars, there is no way to use the OLE control alone
to get the toolbars back. The following example shows how to access
the Word toolbars after closing them.
Step-by-Step Example
- Start Visual Basic or from the File menu, choose New Project (ALT, F, N)
if Visual Basic is already running. Form1 is created by default.
- Add an MSOLE2 control (OLE1) to Form1. When the Insert Object dialog box
asks what type of object to insert, choose the Create From File option.
and select a Microsoft Word .DOC file.
- Set the SizeMode property of the OLE1 control to 1 (Stretch).
- Add a command button (Command1) to Form1.
- Add the following code to the click event of the Command1 button:
Sub Command1_Click()
Dim wbObject As Object
ole1.Action = 7
Set wbObject = CreateObject("Word.basic")
wbObject.ViewToolbars "Standard", , , , , , , 1
End Sub
- Run the program.
- Double-click the OLE1 control. If you see the toolbars, close them and
press the ESC key to return control to Visual Basic. Double-click the
OLE1 control again. This time the toolbars are gone. Now click the
Command1 button to bring up the Standard toolbar. To bring up any of
the other toolbars from this point, move the mouse pointer over the
Standard toolbar. Then click the right mouse button, and choose the
toolbar you want.
Additional query words:
Keywords : kbAutomation kbCtrl kbVBp300 kbWord
Version : WINDOWS:6.0
Platform : WINDOWS
Issue type :
|