Microsoft KB Archive/297304

= Visio2002: How to Run Sample Code from Knowledge Base Articles =

Article ID: 297304

Article Last Modified on 10/11/2006

-

APPLIES TO


 * Microsoft Visio 2002 Standard Edition
 * Microsoft Visio 2002 Professional Edition

-



This article was previously published under Q297304



For a Microsoft Visio 2000 version of this article, see 277011.



SUMMARY
The Microsoft Knowledge Base contains many articles that contain sample code for Visual Basic for Applications macros. Many of these macros illustrate basic concepts of programming in Visual Basic for Microsoft Visio. This article contains instructions on how to use the sample code to create a new macro and how to run that macro.



MORE INFORMATION
Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements. Microsoft Visio stores macros in a module within a project that is stored in a template (.vst), a stencil (.vss), or a drawing (.vsd). To use the sample code in a Knowledge Base article, you must first add a new Visual Basic macro (or select an existing macro) in a Visio template, stencil, or drawing. Then you can paste or type the sample code into this macro.

To Create a New Macro
 Open or create a Visio template, stencil, or drawing as appropriate. On the Tools menu, point to Macro, and then click Macros. In the Macros In list, click the location or module where you want to save the macro. In the Macro Name box, type a name for the macro. Click Create to open the Visual Basic Editor. Do one of the following: <ul>  Type the macro code between the Sub Macroname line and the End Sub line. Sub macroname Type your macro code here End Sub </li>  Copy and paste the sample code to your macro by following these steps: Sub macroname End Sub <ol style="list-style-type: lower-alpha;"> Switch to the program that you are using to view the Microsoft Knowledge Base article, such as Microsoft Internet Explorer.</li> To select the sample code, hold down the CTRL key and then single-click the code.</li> On the Edit menu, click Copy.</li> Switch to the Visual Basic Editor.</li> In the Visual Basic Editor, select the existing code text of Sub Macroname to the End Sub of the macro.</li> On the Edit menu, click Paste.

NOTE: When you paste, the existing code text will be replaced with the code that you copied from the Knowledge Base article.</li></ol> </li></ul> </li> After typing or pasting the code for your macro, click Close and Return to Visio on the File menu.

NOTE: Use the TAB key to indent text. Lines that begin with an apostrophe (') are comments that are not required to run the macro. However, you may want to type comments to make it easier to understand what the macro is doing.</li></ol>

To Add the Sample Code to a Module
To add code to a module, you must either have an existing module or create a new module. To do this, follow these steps:
 * 1) Open or create a Visio template, stencil, or drawing as appropriate.
 * 2) On the Tools menu, point to Macro and then click Visual Basic Editor.
 * 3) In the Project window of the Visual Basic Editor (by default this is in the upper-left corner), click the project icon with the same name as your template, stencil, or drawing. If you have not yet saved your template or drawing, the project name will be similar to Project(Drawing1).
 * 4) If the project that you clicked does not contain a folder called Modules underneath it, click Module on the Insert menu.
 * 5) Click anywhere in the code window of the module that you want to create. The code window is usually in the upper-right corner of the Visual Basic Editor.
 * 6) Type or paste the sample code exactly as it appears in the Knowledge Base article, including the Sub Macroname and End Sub lines.

NOTE: For more information about typing or pasting the macro code, please see the &quot;To Create a New Macro&quot; section in this article.
 * 1) After typing or pasting the code for your macro, click Close and Return to Visio on the File menu.

To Run the Macro

 * 1) On the Tools menu, point to Macro and then click Macros.
 * 2) Select the name of the macro in the Macro Name list, and then click Run.

If Microsoft Visual Basic for Applications warns you with the following message

The macros in the project are disabled. Please refer to the online help or documentation of the host application determine how to enable macros.

the macro security level in Visio is set to High, or macros are disabled.

For additional information, click the article number below to view the article in the Microsoft Knowledge Base:

297136 Visio2002: &quot;The Macros in the Project Are Disabled&quot; Message When You Run a Macro

<div class="references_section">