<?xml version="1.0" encoding="UTF-8" ?>
<?xml-stylesheet type="text/xsl" href="https://communities.bentley.com/cfs-file/__key/system/syndication/rss.xsl" media="screen"?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/"><channel><title>Running a VBA Routine by Keyin</title><link>https://communities.bentley.com/products/microstation/w/microstation__wiki/21821/running-a-vba-routine-by-keyin</link><description>Bentley View, MicroStation, PowerDraft</description><dc:language>en-US</dc:language><generator>Telligent Community 12</generator><item><title>Running a VBA Routine by Keyin</title><link>https://communities.bentley.com/products/microstation/w/microstation__wiki/21821/running-a-vba-routine-by-keyin</link><pubDate>Mon, 08 Jun 2015 17:44:56 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:ad284653-360a-46be-9f07-24623a60e58d</guid><dc:creator>Tristan Anderson</dc:creator><comments>https://communities.bentley.com/products/microstation/w/microstation__wiki/21821/running-a-vba-routine-by-keyin#comments</comments><description>Current Revision posted to MicroStation Wiki by Tristan Anderson on 6/8/2015 5:44:56 PM&lt;br /&gt;
&lt;h1&gt;&lt;b&gt;&lt;img style="border-width:0px;" alt=" " src="/cfs-file.ashx/__key/communityserver-components-sitefiles/TSG-Logo.png" width="189" height="60" /&gt;&lt;/b&gt;&lt;/h1&gt;
&lt;table style="width:500px;background-color:#dce5f0;border:#dce5f0 0px solid;" border="0"&gt;
&lt;tbody&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&amp;nbsp;&lt;/b&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/b&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/b&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;span style="font-size:medium;"&gt;&lt;b&gt;&lt;span style="font-family:Calibri;font-size:medium;"&gt;Applies To&amp;nbsp;&lt;/span&gt;&lt;/b&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Product(s):&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;MicroStation&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Version(s):&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;08.11.09.578 &lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Environment:&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;Windows 7 32 bit,Windows 7 64 bit&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Area:&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;Programming&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Subarea:&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;VBA&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Original Author:&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;Tristan Anderson, Bentley Technical Support Group&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&amp;nbsp;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&amp;nbsp;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;/tbody&gt;
&lt;/table&gt;
&lt;p&gt;&lt;span&gt;&lt;span&gt;&lt;/span&gt;&lt;/span&gt;&amp;nbsp;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;There is often a need to run a VBA subroutine with a shortcut in order to use a keyin as a part of a batch, to integrate the call into a menu, or so the execution can be carried out by a button press.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;This VBA sample is created to give users without previous knowledge of VBA the opportunity to try a simple example on their own.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;To create a VBA routine in Microstation, click the &amp;quot;Project Manager&amp;quot; option under the &amp;quot;Utilities&amp;quot; dropdown menu under &amp;quot;Macro&amp;quot;.&amp;nbsp;&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/6232.1.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/6232.1.png" width="403" height="417" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;In the Project Manager, a default.mvba file is usually already loaded, which is shown in the following window.&lt;span class="Apple-converted-space"&gt;&amp;nbsp;&lt;/span&gt;&lt;/span&gt;&lt;span&gt;Creating a new project is done by clicking the &amp;quot;New Project&amp;quot; icon shown in the following window:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/0474.2.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/0474.2.png" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;The &amp;quot;New Project&amp;quot; menu opens a Save dialog to create a .MVBA file. It is reccomeded to accept the default path (The VBA directory in the Microstation Workspace), so there will be no need to key in your specific patch in the subsequent Keyin browser.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/3.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/3.png" width="438" height="328" alt=" " /&gt;&lt;/a&gt;&lt;br /&gt;&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;I have chosen to name the project &amp;quot;Test&amp;quot;. Once you have created a new project, we can open it in the VBA editor. Highlight the project you just created, and click the &amp;quot;Visual Basic Editor&amp;quot; icon (5th button in the toolbar).&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/6170.4.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/6170.4.png" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;Under the &amp;quot;test&amp;quot; project is an automatically created module named &amp;quot;Module1&amp;quot;. Double-clicking on &amp;quot;Module1&amp;quot; will open a pane in the input area for the program&amp;#39;s code. Here, we have a simple exmplae that opens a dialog box. The subroutine name, project name, and module name circled below will be needed during the Keyin process.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;The program code only includes these 3 lines:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;pre class="brush: vb; fontsize: 100; first-line: 1; "&gt;Sub mytest ()
MsgBox &amp;quot;Hello world&amp;quot;
End Sub&lt;/pre&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/5.PNG"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/5.PNG" width="503" height="353" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;A VBA subroutine can be loaded and started via the following general Keyin:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;VBA RUN [Projectname]Modulname.Subroutine&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;In our example, it is the following command:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;vba run [test]module1.mytest&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;If there are no other modules in the project,&amp;nbsp;the module name may be omitted:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;vba run [test]mytest&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;If the VBA project is already loaded and&amp;nbsp;there are not several subroutines defined with the same name in multiple projects,&amp;nbsp;the project name can be&amp;nbsp;omitted, giving us the shortest Keyin:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;&lt;span&gt;&lt;span&gt;vba run mytest&lt;/span&gt;&lt;/span&gt;&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;The dialog box opens when the specific keyin is run:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/6.PNG"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/6.PNG" width="486" height="397" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;&amp;nbsp;For questions or problems, please contact Technical Support&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;

&lt;div style="font-size: 90%;"&gt;Tags: VBAWindows 7 32 bit, MicroStation, Windows 7 64 bit, Programming, en, 08.11.09.578, SELECTsupport&lt;/div&gt;
</description></item><item><title>Running a VBA Routine by Keyin</title><link>https://communities.bentley.com/products/microstation/w/microstation__wiki/21821/running-a-vba-routine-by-keyin/revision/3</link><pubDate>Mon, 08 Jun 2015 17:44:32 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:ad284653-360a-46be-9f07-24623a60e58d</guid><dc:creator>Tristan Anderson</dc:creator><comments>https://communities.bentley.com/products/microstation/w/microstation__wiki/21821/running-a-vba-routine-by-keyin#comments</comments><description>Revision 3 posted to MicroStation Wiki by Tristan Anderson on 6/8/2015 5:44:32 PM&lt;br /&gt;
&lt;h1&gt;&lt;b&gt;&lt;img style="border-width:0px;" alt=" " src="/cfs-file.ashx/__key/communityserver-components-sitefiles/TSG-Logo.png" width="189" height="60" /&gt;&lt;/b&gt;&lt;/h1&gt;
&lt;table style="width:500px;background-color:#dce5f0;border:#dce5f0 0px solid;" border="0"&gt;
&lt;tbody&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&amp;nbsp;&lt;/b&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/b&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/b&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;span style="font-size:medium;"&gt;&lt;b&gt;&lt;span style="font-family:Calibri;font-size:medium;"&gt;Applies To&amp;nbsp;&lt;/span&gt;&lt;/b&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Product(s):&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;MicroStation&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Version(s):&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;08.11.09.578 &lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Environment:&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;Windows 7 32 bit,Windows 7 64 bit&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Area:&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;Programming&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Subarea:&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;VBA&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Original Author:&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;Tristan Anderson, Bentley Technical Support Group&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&amp;nbsp;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&amp;nbsp;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;/tbody&gt;
&lt;/table&gt;
&lt;p&gt;&lt;span&gt;&lt;span&gt;&lt;/span&gt;&lt;/span&gt;&amp;nbsp;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;There is often a need to run a VBA subroutine with a shortcut in order to use a keyin as a part of a batch, to integrate the call into a menu, or so the execution can be carried out by a button press.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;This VBA sample is created to give users without previous knowledge of VBA the opportunity to try a simple example on their own.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;To create a VBA routine in Microstation, click the &amp;quot;Project Manager&amp;quot; option under the &amp;quot;Utilities&amp;quot; dropdown menu under &amp;quot;Macro&amp;quot;.&amp;nbsp;&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/6232.1.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/6232.1.png" width="403" height="417" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;In the Project Manager, a default.mvba file is usually already loaded, which is shown in the following window.&lt;span class="Apple-converted-space"&gt;&amp;nbsp;&lt;/span&gt;&lt;/span&gt;&lt;span&gt;Creating a new project is done by clicking the &amp;quot;New Project&amp;quot; icon shown in the following window:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/0474.2.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/0474.2.png" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;The &amp;quot;New Project&amp;quot; menu opens a Save dialog to create a .MVBA file. It is reccomeded to accept the default path (The VBA directory in the Microstation Workspace), so there will be no need to key in your specific patch in the subsequent Keyin browser.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/3.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/3.png" width="438" height="328" alt=" " /&gt;&lt;/a&gt;&lt;br /&gt;&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;I have chosen to name the project &amp;quot;Test&amp;quot;. Once you have created a new project, we can open it in the VBA editor. Highlight the project you just created, and click the &amp;quot;Visual Basic Editor&amp;quot; icon (5th button in the toolbar).&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/6170.4.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/6170.4.png" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;Under the &amp;quot;test&amp;quot; project is an automatically created module named &amp;quot;Module1&amp;quot;. Double-clicking on &amp;quot;Module1&amp;quot; will open a pane in the input area for the program&amp;#39;s code. Here, we have a simple exmplae that opens a dialog box. The subroutine name, project name, and module name circled below will be needed during the Keyin process.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;The program code only includes these 3 lines:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;pre class="brush: applescript; fontsize: 100; first-line: 1; "&gt;Sub mytest ()

MsgBox &amp;quot;Hello world&amp;quot;

End Sub&lt;/pre&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/5.PNG"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/5.PNG" width="503" height="353" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;A VBA subroutine can be loaded and started via the following general Keyin:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;VBA RUN [Projectname]Modulname.Subroutine&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;In our example, it is the following command:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;vba run [test]module1.mytest&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;If there are no other modules in the project,&amp;nbsp;the module name may be omitted:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;vba run [test]mytest&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;If the VBA project is already loaded and&amp;nbsp;there are not several subroutines defined with the same name in multiple projects,&amp;nbsp;the project name can be&amp;nbsp;omitted, giving us the shortest Keyin:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;&lt;span&gt;&lt;span&gt;vba run mytest&lt;/span&gt;&lt;/span&gt;&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;The dialog box opens when the specific keyin is run:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/6.PNG"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/6.PNG" width="486" height="397" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;&amp;nbsp;For questions or problems, please contact Technical Support&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;

&lt;div style="font-size: 90%;"&gt;Tags: VBAWindows 7 32 bit, MicroStation, Windows 7 64 bit, Programming, en, 08.11.09.578, SELECTsupport&lt;/div&gt;
</description></item><item><title>Running a VBA Routine by Keyin</title><link>https://communities.bentley.com/products/microstation/w/microstation__wiki/21821/running-a-vba-routine-by-keyin/revision/2</link><pubDate>Fri, 05 Jun 2015 14:53:43 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:ad284653-360a-46be-9f07-24623a60e58d</guid><dc:creator>Tristan Anderson</dc:creator><comments>https://communities.bentley.com/products/microstation/w/microstation__wiki/21821/running-a-vba-routine-by-keyin#comments</comments><description>Revision 2 posted to MicroStation Wiki by Tristan Anderson on 6/5/2015 2:53:43 PM&lt;br /&gt;
&lt;h1&gt;&lt;b&gt;&lt;img style="border-width:0px;" alt=" " src="http://communities.bentley.com/cfs-file.ashx/__key/communityserver-components-sitefiles/TSG-Logo.png" width="189" height="60" /&gt;&lt;/b&gt;&lt;/h1&gt;
&lt;table style="width:500px;background-color:#dce5f0;border:#dce5f0 0px solid;" border="0"&gt;
&lt;tbody&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&amp;nbsp;&lt;/b&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/b&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/b&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;span style="font-size:medium;"&gt;&lt;b&gt;&lt;span style="font-family:Calibri;font-size:medium;"&gt;Applies To&amp;nbsp;&lt;/span&gt;&lt;/b&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Product(s):&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;MicroStation&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Version(s):&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;08.11.09.578 &lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Environment:&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;Windows 7 32 bit,Windows 7 64 bit&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Area:&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;Programming&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Subarea:&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;VBA&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;&lt;/span&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;span style="font-family:Calibri;"&gt;Original Author:&lt;/span&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;span style="font-family:Calibri;"&gt;Tristan Anderson, Bentley Technical Support Group&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&amp;nbsp;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&amp;nbsp;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;
&lt;/tr&gt;
&lt;/tbody&gt;
&lt;/table&gt;
&lt;p&gt;&lt;span&gt;&lt;span&gt;&lt;/span&gt;&lt;/span&gt;&amp;nbsp;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;There is often a need to run a VBA subroutine with a shortcut in order to use a keyin as a part of a batch, to integrate the call into a menu, or so the execution can be carried out by a button press.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;This VBA sample is created to give users without previous knowledge of VBA the opportunity to try a simple example on their own.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;To create a VBA routine in Microstation, click the &amp;quot;Project Manager&amp;quot; option under the &amp;quot;Utilities&amp;quot; dropdown menu under &amp;quot;Macro&amp;quot;.&amp;nbsp;&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/6232.1.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/6232.1.png" width="403" height="417" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;In the Project Manager, a default.mvba file is usually already loaded, which is shown in the following window.&lt;span class="Apple-converted-space"&gt;&amp;nbsp;&lt;/span&gt;&lt;/span&gt;&lt;span&gt;Creating a new project is done by clicking the &amp;quot;New Project&amp;quot; icon shown in the following window:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/0474.2.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/0474.2.png" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;The &amp;quot;New Project&amp;quot; menu opens a Save dialog to create a .MVBA file. It is reccomeded to accept the default path (The VBA directory in the Microstation Workspace), so there will be no need to key in your specific patch in the subsequent Keyin browser.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/3.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/3.png" width="438" height="328" alt=" " /&gt;&lt;/a&gt;&lt;br /&gt;&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;I have chosen to name the project &amp;quot;Test&amp;quot;. Once you have created a new project, we can open it in the VBA editor. Highlight the project you just created, and click the &amp;quot;Visual Basic Editor&amp;quot; icon (5th button in the toolbar).&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/6170.4.png"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/6170.4.png" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;Under the &amp;quot;test&amp;quot; project is an automatically created module named &amp;quot;Module1&amp;quot;. Double-clicking on &amp;quot;Module1&amp;quot; will open a pane in the input area for the program&amp;#39;s code. Here, we have a simple exmplae that opens a dialog box. The subroutine name, project name, and module name circled below will be needed during the Keyin process.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;The program code only includes these 3 lines:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;pre&gt;Sub mytest ()

MsgBox &amp;quot;Hello world&amp;quot;

End Sub&lt;/pre&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/5.PNG"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/5.PNG" width="503" height="353" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;A VBA subroutine can be loaded and started via the following general Keyin:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;VBA RUN [Projectname]Modulname.Subroutine&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;In our example, it is the following command:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;vba run [test]module1.mytest&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;If there are no other modules in the project,&amp;nbsp;the module name may be omitted:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;vba run [test]mytest&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;If the VBA project is already loaded and&amp;nbsp;there are not several subroutines defined with the same name in multiple projects,&amp;nbsp;the project name can be&amp;nbsp;omitted, giving us the shortest Keyin:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;&lt;span&gt;&lt;span&gt;vba run mytest&lt;/span&gt;&lt;/span&gt;&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;The dialog box opens when the specific keyin is run:&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;a href="/cfs-file/__key/communityserver-wikis-components-files/00-00-00-00-35/6.PNG"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-wikis-components-files/00-00-00-00-35/6.PNG" width="486" height="397" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:#000000;margin:1.5em 0px;letter-spacing:normal;background-color:#ffffff;text-indent:0px;"&gt;&lt;span&gt;&lt;span&gt;&amp;nbsp;For questions or problems, please contact Technical Support&lt;/span&gt;&lt;/span&gt;&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;

&lt;div style="font-size: 90%;"&gt;Tags: VBAWindows 7 32 bit, MicroStation, Windows 7 64 bit, Programming, en, 08.11.09.578, SELECTsupport&lt;/div&gt;
</description></item><item><title>Running a VBA Routine by Keyin</title><link>https://communities.bentley.com/products/microstation/w/microstation__wiki/21821/running-a-vba-routine-by-keyin/revision/1</link><pubDate>Fri, 05 Jun 2015 14:49:48 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:ad284653-360a-46be-9f07-24623a60e58d</guid><dc:creator>Tristan Anderson</dc:creator><comments>https://communities.bentley.com/products/microstation/w/microstation__wiki/21821/running-a-vba-routine-by-keyin#comments</comments><description>Revision 1 posted to MicroStation Wiki by Tristan Anderson on 6/5/2015 2:49:48 PM&lt;br /&gt;
&lt;h1&gt;&lt;b&gt;&lt;img style="border-left-width:0px;border-right-width:0px;border-bottom-width:0px;border-top-width:0px;" alt=" " src="http://communities.bentley.com/cfs-file.ashx/__key/communityserver-components-sitefiles/TSG-Logo.png" width="189" height="60" /&gt;&lt;/b&gt;&lt;/h1&gt;
&lt;table style="border-top:#dce5f0 0px solid;border-right:#dce5f0 0px solid;width:500px;border-bottom:#dce5f0 0px solid;border-left:#dce5f0 0px solid;background-color:#dce5f0;" border="0"&gt;
&lt;tbody&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&amp;nbsp;&lt;/b&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&lt;font face="Calibri"&gt;&amp;nbsp;&lt;/font&gt;&lt;/b&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;&lt;/font&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;b&gt;&lt;font face="Calibri"&gt;&amp;nbsp;&lt;/font&gt;&lt;/b&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;span style="font-size:medium;"&gt;&lt;b&gt;&lt;font size="3" face="Calibri"&gt;Applies To&amp;nbsp;&lt;/font&gt;&lt;/b&gt;&lt;/span&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;&lt;/font&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;&amp;nbsp;&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;&amp;nbsp;&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;&lt;/font&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;&amp;nbsp;&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;Product(s):&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;MicroStation&lt;/font&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;&amp;nbsp;&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;Version(s):&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;08.11.09.578 &lt;/font&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;&amp;nbsp;&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;Environment:&amp;nbsp;&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;Windows 7 32 bit,Windows 7 64 bit&lt;/font&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;&amp;nbsp;&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;Area:&amp;nbsp;&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;Programming&lt;/font&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;&amp;nbsp;&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;Subarea:&amp;nbsp;&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;VBA&lt;/font&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;&lt;/font&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;&amp;nbsp;&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&lt;font face="Calibri"&gt;Original Author:&lt;/font&gt;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;font face="Calibri"&gt;Tristan Anderson, Bentley Technical Support Group&lt;/font&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;&lt;/tr&gt;
&lt;tr&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&amp;nbsp;&lt;/strong&gt;&lt;/td&gt;
&lt;td style="text-align:right;"&gt;&lt;strong&gt;&amp;nbsp;&lt;/strong&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;
&lt;td&gt;&lt;/td&gt;&lt;/tr&gt;&lt;/tbody&gt;&lt;/table&gt;
&lt;p&gt;&lt;font&gt;&lt;font&gt;&lt;/font&gt;&lt;/font&gt;&amp;nbsp;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;There is often a need to run a VBA subroutine with a shortcut in order to use a keyin as a part of a batch, to integrate the call into a menu, or so the execution can be carried out by a button press.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;This VBA sample is created to give users without previous knowledge of VBA the opportunity to try a simple example on their own.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;font&gt;&lt;font&gt;To create a VBA routine in Microstation, click the &amp;quot;Project Manager&amp;quot; option under the &amp;quot;Utilities&amp;quot; dropdown menu under &amp;quot;Macro&amp;quot;.&amp;nbsp;&lt;/font&gt;&lt;/font&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;11111111111&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;font&gt;&lt;font&gt;In the Project Manager, a default.mvba file is usually already loaded, which is shown in the following window.&lt;span class="Apple-converted-space"&gt;&amp;nbsp;&lt;/span&gt;&lt;/font&gt;&lt;font&gt;Creating a new project is done by clicking the &amp;quot;New Project&amp;quot; icon shown in the following window:&lt;/font&gt;&lt;/font&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;22222222222222&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;The &amp;quot;New Project&amp;quot; menu opens a Save dialog to create a .MVBA file. It is reccomeded to accept the default path (The VBA directory in the Microstation Workspace), so there will be no need to key in your specific patch in the subsequent Keyin browser.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;font&gt;&lt;font&gt;333333333333333&lt;/font&gt;&lt;/font&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;I have chosen to name the project &amp;quot;Test&amp;quot;. Once you have created a new project, we can open it in the VBA editor. Highlight the project you just created, and click the &amp;quot;Visual Basic Editor&amp;quot; icon (5th button in the toolbar).&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;44444444444444&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;Under the &amp;quot;test&amp;quot; project is an automatically created module named &amp;quot;Module1&amp;quot;. Double-clicking on &amp;quot;Module1&amp;quot; will open a pane in the input area for the program&amp;#39;s code. Here, we have a simple exmplae that opens a dialog box. The subroutine name, project name, and module name circled below will be needed during the Keyin process.&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;font&gt;&lt;font&gt;The program code only includes these 3 lines:&lt;/font&gt;&lt;/font&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;font&gt;&lt;font&gt;Sub&amp;nbsp;mytest ()&lt;/font&gt;&lt;/font&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;MsgBox &amp;quot;Hello world&amp;quot;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;End Sub&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;555555555555&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;font&gt;&lt;font&gt;A VBA subroutine can be loaded and started via the following general Keyin:&lt;/font&gt;&lt;/font&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;VBA RUN [Projectname]Modulname.Subroutine&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;font&gt;&lt;font&gt;In our example, it is the following command:&lt;/font&gt;&lt;/font&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;vba run [test]module1.mytest&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;font&gt;&lt;font&gt;If there are no other modules in the project,&amp;nbsp;the module name may be omitted:&lt;/font&gt;&lt;/font&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;vba run [test]mytest&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;font&gt;&lt;font&gt;If the VBA project is already loaded and&amp;nbsp;there are not several subroutines defined with the same name in multiple projects,&amp;nbsp;the project name can be&amp;nbsp;omitted, giving us the shortest Keyin:&lt;/font&gt;&lt;/font&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;strong style="font-weight:bold;"&gt;&lt;font&gt;&lt;font&gt;vba run mytest&lt;/font&gt;&lt;/font&gt;&lt;/strong&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;font&gt;&lt;font&gt;The dialog box opens when the specific keyin is run:&lt;/font&gt;&lt;/font&gt;&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;6666666666666666&lt;/p&gt;
&lt;p style="white-space:normal;text-transform:none;color:rgb(0,0,0);margin:1.5em 0px;letter-spacing:normal;background-color:rgb(255,255,255);text-indent:0px;"&gt;&lt;font&gt;&lt;font&gt;&amp;nbsp;For questions or problems, please contact Technical Support&lt;/font&gt;&lt;/font&gt;&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;

&lt;div style="font-size: 90%;"&gt;Tags: VBAWindows 7 32 bit, MicroStation, Windows 7 64 bit, Programming, en, 08.11.09.578, SELECTsupport&lt;/div&gt;
</description></item></channel></rss>