<?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>Mini's Activities</title><link>https://communities.bentley.com/members/c6bdfa7a_2d00_63d0_2d00_466f_2d00_b420_2d00_c95231e28ffb</link><description>Mini's recent activity</description><dc:language>en-US</dc:language><generator>Telligent Community 12</generator><item><title>&amp;quot;Bild in Datei rendern&amp;quot; mit Hintergrundbild</title><link>https://communities.bentley.com/products/building/building_analysis___design/f/aecosim-speedikon---forum-deutsch/133408/bild-in-datei-rendern-mit-hintergrundbild</link><pubDate>Tue, 28 Mar 2017 09:14:03 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:d4097571-fcda-4bbc-b03e-9dbd49503b5a</guid><dc:creator>Mini</dc:creator><description>&lt;p&gt;&lt;em&gt;Speedikon M, 08.11.12.33 &amp;amp; speedikon MH, 08.11.11.33&lt;/em&gt;&lt;/p&gt;
&lt;p&gt;&lt;/p&gt;
&lt;p&gt;Kann man bei &amp;quot;Bild in Datei rendern&amp;quot; ein Hintergrundbild miteinstellen?&lt;/p&gt;
&lt;p&gt;Oder gibt es eine andere M&amp;ouml;glichkeit, die aktuelle Ansicht mit Hintergrundbild zu rendern?&lt;/p&gt;
&lt;p&gt;Das normale Render-Setup kommt nicht in Frage, da wir genau die aktuelle Ansichtseinstellung &amp;uuml;bernehmen m&amp;ouml;chten.&lt;/p&gt;
&lt;p&gt;&lt;/p&gt;
&lt;p&gt;Gr&amp;uuml;&amp;szlig;e, Mini&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;</description></item><item><title>speedikon Zeichnungsfilter: Wände in Ansicht schraffieren</title><link>https://communities.bentley.com/products/building/building_analysis___design/f/aecosim-speedikon---forum-deutsch/133143/speedikon-zeichnungsfilter-wande-in-ansicht-schraffieren</link><pubDate>Tue, 21 Mar 2017 13:09:52 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:16ea63dc-d114-422e-af17-eca829264428</guid><dc:creator>Mini</dc:creator><description>&lt;p&gt;Gibt es eine M&amp;ouml;glichkeit bestimmte Wandprototypen in den gerechneten Ansichten mittels Zeichnungsfilter zu schraffieren?&lt;/p&gt;
&lt;p&gt;Ich h&amp;auml;tte es schon mittels xhatch probiert, das greift jedoch in den Ansichten nicht.&lt;/p&gt;
&lt;p&gt;&lt;/p&gt;
&lt;p&gt;Gr&amp;uuml;&amp;szlig;e,&lt;/p&gt;
&lt;p&gt;Mini&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;</description></item><item><title>Licht-Setup aus Datei</title><link>https://communities.bentley.com/products/microstation/f/microstation-forum-deutsch/133190/licht-setup-aus-datei</link><pubDate>Wed, 22 Mar 2017 13:17:36 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:a5de6bdf-6aec-4453-acca-52739e158538</guid><dc:creator>Mini</dc:creator><description>&lt;p&gt;Gibt es eine M&amp;ouml;glichkeit, verschiede Licht-Setups z.B. aus einer dgnlib o.&amp;auml;. zu importieren?&lt;/p&gt;
&lt;p&gt;Wir ben&amp;ouml;tigen f&amp;uuml;r die verschiedenen Ansichtspositionen passende Sonnenpositionseinstellungen.&lt;/p&gt;
&lt;p&gt;Mittels dgnlib ist es mir bisher nicht gelungen. Wenn die Licht-Setups jedoch vorhanden w&amp;auml;ren, w&amp;uuml;rde es funktionieren, das jeweils ben&amp;ouml;tigte Setup per VBA zu aktivieren.&lt;/p&gt;
&lt;p&gt;Ebenso ist es mir nicht gelungen die jeweiligen Sonnenpositionseinstellungen per VBA zu steuern, da die Steuerung von Azimut und H&amp;ouml;he nur dann funktioniert, wenn &amp;quot;Sonne&amp;quot; aktiv ist - beim Aufrufen der Lichteinstellungen ist dies jedoch nicht der Fall und die aktive Auswahl mittels VBA auf Sonne zu stellen ist mir leider auch nicht gelungen.&lt;/p&gt;
&lt;p&gt;&lt;a href="/cfs-file/__key/communityserver-discussions-components-files/343566/6837.Unbenannt.JPG"&gt;&lt;img src="/resized-image/__size/940x0/__key/communityserver-discussions-components-files/343566/6837.Unbenannt.JPG" width="718" height="306" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;
&lt;p&gt;&lt;/p&gt;
&lt;p&gt;Gr&amp;uuml;&amp;szlig;e, Mini&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;</description></item><item><title>VBA: pattern informations</title><link>https://communities.bentley.com/products/programming/microstation_programming/f/microstation-programming---forum/132509/vba-pattern-informations</link><pubDate>Mon, 06 Mar 2017 10:32:58 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:fba1327c-cc71-4b2b-a2d7-9b15f73c740f</guid><dc:creator>Mini</dc:creator><description>&lt;p&gt;How do I get pattern informations of a pattern placed with &amp;quot;associative pattern&amp;quot; and &amp;quot;associative region boundary&amp;quot; with VBA?&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;</description></item><item><title>Schraffur ohne Umrandung</title><link>https://communities.bentley.com/products/microstation/f/microstation-forum-deutsch/132352/schraffur-ohne-umrandung</link><pubDate>Wed, 01 Mar 2017 13:25:34 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:079a2d11-bd2f-46e7-9efc-b8d37453764f</guid><dc:creator>Mini</dc:creator><description>&lt;p&gt;Wie kann man zum Beispiel anhand eines Zaun-Bereiches eine Fl&amp;auml;che schraffieren, OHNE, dass diese Schraffur automatisch umrandet wird und OHNE, dass die Schraffur nur mehr aus Linien etc. besteht (die Schraffur selbst soll zb. vom Typ Polygon bzw. komplexe Polygonfl&amp;auml;che sein, d.h. die Schraffur soll als ganzes angreifbar sein)?&lt;/p&gt;
&lt;p&gt;&lt;/p&gt;
&lt;p&gt;Hier eine Skizze: Der Bereich zwischen den 4 Linien soll schraffiert werden, es sollen aber keine &amp;quot;Abschlusskanten&amp;quot; erstellt werden und die Schraffur soll als ganzes angreifbar sein.&lt;/p&gt;
&lt;p&gt;&lt;a href="/cfs-file/__key/communityserver-discussions-components-files/343566/aSchraffur.JPG"&gt;&lt;img src="/resized-image/__size/300x0/__key/communityserver-discussions-components-files/343566/aSchraffur.JPG" alt=" " /&gt;&lt;/a&gt;&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;</description></item><item><title>Speedikon Projektverwaltung über Shell aufrufen (Parameter)</title><link>https://communities.bentley.com/products/building/building_analysis___design/f/aecosim-speedikon---forum-deutsch/128325/speedikon-projektverwaltung-uber-shell-aufrufen-parameter</link><pubDate>Fri, 11 Nov 2016 10:31:05 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:1356e7e2-09a0-4c7c-b029-94f49e6723bb</guid><dc:creator>Mini</dc:creator><description>&lt;p&gt;Hallo,&lt;/p&gt;
&lt;p&gt;&lt;br /&gt;kann man der Speedikon Projektverwaltung mittels Shell-Aufruf einen bestimmten Pfad auf ein bestimmtes Projekt mitgeben, damit vorgegebenes Projekt beim Start gleich angezeigt wird?&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;</description></item><item><title>speedikon Stapelbetrieb (Elementreport) funktioniert nicht immer</title><link>https://communities.bentley.com/products/building/building_analysis___design/f/aecosim-speedikon---forum-deutsch/127660/speedikon-stapelbetrieb-elementreport-funktioniert-nicht-immer</link><pubDate>Tue, 25 Oct 2016 11:43:03 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:a2065f17-3a9c-4043-afaa-cd8e36b73011</guid><dc:creator>Mini</dc:creator><description>&lt;p&gt;Hallo,&lt;/p&gt;
&lt;p&gt;ich m&amp;ouml;chte mittels Stapelbetrieb den Elementreport &amp;quot;LuftRaum&amp;quot; in den Geschossen 1-4 automatisch starten.&lt;/p&gt;
&lt;p&gt;Leider funktioniert der Stapelbetrieb nur gelegendlich.. ich konnte leider noch keinerlei Hinweis darauf finden, warum das so passiert.&lt;/p&gt;
&lt;p&gt;Wenn man den Elementreport seperat in den jeweiligen Geschossen startet funktioniert es.&lt;/p&gt;
&lt;p&gt;&lt;/p&gt;
&lt;p&gt;Hier der VBA-Code f&amp;uuml;r den Stapelbetrieb:&lt;/p&gt;
&lt;p&gt;&lt;span style="color:#3366ff;"&gt;&lt;em&gt;Sub Elementreport()&lt;br /&gt;&lt;br /&gt;Dim FF As Integer&lt;br /&gt;Dim pfad As String&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;#39; Pfad zur job.lst-Datei&lt;br /&gt;Dim Pfad1 As String&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;#39; Pfad zum Speedikon-Programmverzeichnis&lt;br /&gt;Dim pfad2 As String&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;#39; Pfad zur area.bat-Datei&lt;br /&gt;Dim retval As Double&lt;br /&gt;&lt;br /&gt;&lt;br /&gt;FF = FreeFile&lt;br /&gt;&lt;br /&gt;pfad = Left(ActiveDesignFile.Path, InStr(ActiveDesignFile.Path, &amp;quot;.bpd&amp;quot;) + 7) + &amp;quot;\bat\&amp;quot;&lt;br /&gt;&lt;br /&gt;&amp;#39; Es wird gepr&amp;uuml;ft, ob das Verzeichnis &amp;quot;...bpd\bat&amp;quot; im Projektordner vorhanden ist - wenn nicht wird es erstellt.&lt;br /&gt;If Dir(pfad, vbDirectory) = &amp;quot;&amp;quot; Then&lt;br /&gt;&amp;nbsp; MkDir (pfad)&lt;br /&gt;End If&lt;br /&gt;&lt;br /&gt;pfad = pfad + Environ$(&amp;quot;Computername&amp;quot;)&lt;br /&gt;&lt;br /&gt;&amp;#39; Es wird gepr&amp;uuml;ft, ob das Verzeichnis &amp;quot;...bpd\bat\$COMPUTERNAME$&amp;quot; im Projektordner vorhanden ist - wenn nicht wird es erstellt.&lt;br /&gt;If Dir(pfad, vbDirectory) = &amp;quot;&amp;quot; Then&lt;br /&gt;&amp;nbsp; MkDir (pfad)&lt;br /&gt;End If&lt;br /&gt;&lt;br /&gt;pfad = pfad + &amp;quot;\rpt&amp;quot;&lt;br /&gt;&lt;br /&gt;&amp;#39; Es wird gepr&amp;uuml;ft, ob das Verzeichnis &amp;quot;...bpd\bat\$COMPUTERNAME$\rpt&amp;quot; im Projektordner vorhanden ist - wenn nicht wird es erstellt.&lt;br /&gt;If Dir(pfad, vbDirectory) = &amp;quot;&amp;quot; Then&lt;br /&gt;&amp;nbsp; MkDir (pfad)&lt;br /&gt;End If&lt;br /&gt;&lt;br /&gt;pfad = pfad + &amp;quot;\job.lst&amp;quot;&lt;br /&gt;&lt;br /&gt;&amp;#39; Es wird gepr&amp;uuml;ft, ob die Datei &amp;quot;...bpd\bat\$COMPUTERNAME$\rpt\job.lst&amp;quot; im Projektordner vorhanden ist - wenn nicht wird es erstellt.&lt;br /&gt;If Dir(pfad, vbNormal) = &amp;quot;&amp;quot; Then&lt;br /&gt;&lt;br /&gt;&amp;nbsp; Open pfad For Output As #FF&lt;br /&gt;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;#&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;# Job script for reporting elements&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;# =================================&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;#&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;CMDNAME&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;ReportElement&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;#&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;# Documents to process&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;#&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;CMDQUEUE&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;floor 01:01&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;floor 02:01&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;floor 03:01&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;floor 04:01&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;#&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;# Queue processing arguments&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;#&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;CMDARGS&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;integer P_report_listing_output=1&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;string P_report_listing_name=&amp;quot; + Chr(34) + &amp;quot;luftraum&amp;quot; + Chr(34)&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;string P_report_layout_name=&amp;quot; + Chr(34) + &amp;quot;luftraum&amp;quot; + Chr(34)&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;#&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;# End of job script&amp;quot;&lt;br /&gt;&amp;nbsp; Print #FF, &amp;quot;#&amp;quot;&lt;br /&gt;&lt;br /&gt;&amp;nbsp; Close #FF&lt;br /&gt;&lt;br /&gt;End If&lt;br /&gt;&lt;br /&gt;&amp;#39; Pfad zum Speedikon-Programmverzeichnis wird als pfad1 gespeichert.&lt;br /&gt;Pfad1 = Left(ActiveWorkspace.ConfigurationVariableValue(&amp;quot;MS_CONFIG&amp;quot;), InStrRev(ActiveWorkspace.ConfigurationVariableValue(&amp;quot;MS_CONFIG&amp;quot;), &amp;quot;\&amp;quot;) - 1)&lt;br /&gt;&lt;br /&gt;&amp;#39; Pfad zum Verzeichnis &amp;quot;...bpd\bat\$COMPUTERNAME$\rpt&amp;quot; wird als pfad2 gespeichert.&lt;br /&gt;pfad2 = Left(pfad, Len(pfad) - 8)&lt;br /&gt;&lt;br /&gt;&amp;#39; Datei &amp;quot;area.bat&amp;quot; wird im Verzeichnis &amp;quot;...bpd\bat\$COMPUTERNAME$\rpt&amp;quot; angelegt (bzw. neu erstellt)&lt;br /&gt;Open pfad2 + &amp;quot;\rpt.bat&amp;quot; For Output As #FF&lt;br /&gt;&lt;br /&gt;Print #FF, Environ$(&amp;quot;Systemdrive&amp;quot;)&lt;br /&gt;Print #FF, &amp;quot;cd &amp;quot; + Chr(34) + Pfad1 + Chr(34)&lt;br /&gt;Print #FF, &amp;quot;chcp 1252&amp;gt;nul&amp;quot;&lt;br /&gt;Print #FF, &amp;quot;rptbatch.bat &amp;quot; + Chr(34) + Left(ActiveDesignFile.Path, InStr(ActiveDesignFile.Path, &amp;quot;.bpd&amp;quot;) + 3) + Chr(34)&lt;br /&gt;Close #FF&lt;br /&gt;&lt;br /&gt;&lt;br /&gt;&amp;#39;Shell wartet nicht, bis die Ausf&amp;uuml;hrung beendet ist...&lt;br /&gt;retval = ExecuteWait(pfad2 &amp;amp; &amp;quot;\rpt.bat&amp;quot;, hidden:=True)&lt;br /&gt;&lt;br /&gt;&lt;br /&gt;&lt;br /&gt;End Sub&lt;br /&gt;&lt;br /&gt;Public Function ExecuteWait(ByVal pfad As String, Optional ByVal Argumente As String = &amp;quot;&amp;quot;, Optional ByVal ArbeitsVerzeichnis As String, Optional ByVal FensterStil As Elkmenu.OMProcessWindowStyle = 1, Optional ByVal hidden As Boolean = True) As Integer&lt;br /&gt;Dim p As Elkmenu.Process&lt;br /&gt;Set p = New Elkmenu.Process&lt;br /&gt;p.CreateNoWindow = Not hidden&lt;br /&gt;p.WorkingDirectory = ArbeitsVerzeichnis&lt;br /&gt;p.windowstyle = FensterStil&lt;br /&gt;p.FileName = pfad&lt;br /&gt;p.Arguments = Argumente&lt;br /&gt;p.StartWait&lt;br /&gt;ExecuteWait = p.ExitCode&lt;br /&gt;End Function&lt;/em&gt;&lt;/span&gt;&lt;/p&gt;
&lt;p&gt;&lt;em&gt;&lt;span style="color:#0000ff;"&gt;&amp;nbsp;&lt;/span&gt;&lt;/em&gt;&lt;/p&gt;
&lt;p&gt;&lt;span style="color:#000000;"&gt;Luftraum.mcr:&lt;em&gt;&lt;br /&gt;&lt;/em&gt;&lt;/span&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;# ******************************************************************************************************************************&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;# *&amp;nbsp;&amp;nbsp; file:&amp;nbsp;&amp;nbsp; &amp;nbsp;LuftRaum.mcr&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;# *&amp;nbsp;&amp;nbsp; date:&amp;nbsp;&amp;nbsp; &amp;nbsp;12.10.2016&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;# *&amp;nbsp;&amp;nbsp; translated and formated with&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;# *&amp;nbsp;&amp;nbsp; Bentley Speedikon MacroTranslator &lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;# *&amp;nbsp;&amp;nbsp; Purpose: Erstellt fuer das Luftmengenprotokoll Datei mit Raumnr und Raumname2&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;# *&amp;nbsp;&amp;nbsp; User: Jaci&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;# ******************************************************************************************************************************&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;BESCHREIBUNG LuftRaum;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp; UMGEBUNG report;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp; &lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;VARIABLEN&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;GANZZAHL EE, EENr, iRet2;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;DEZIMAL Vol1, Vol2, Umf;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;ZEICHEN Pfad, Gesch, Bauab, Vol, uUmfang;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp; ENDE&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;projektpfad(Pfad);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;Text_ersetzen(Pfad,&amp;#39;/&amp;#39;,&amp;#39;\&amp;#39;);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;Wenn RP_STOCKWERK &amp;gt; 9 DANN&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;Format(2, GZ2);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;Text(2, Gesch, RP_STOCKWERK);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;Text(2, Bauab, RP_BAUABSCHNITT);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;SONST&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;Format(3, GZ1);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;Text(3, Gesch, RP_STOCKWERK);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;Text(3, Bauab, RP_BAUABSCHNITT);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;ENDE&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;OEFFAUSGAB (Pfad +&amp;nbsp; &amp;#39;\ELK.project.data\Lueftung\&amp;#39; + gesch + &amp;#39;_&amp;#39; + Bauab + &amp;#39;_Luft_Raum.dat&amp;#39;, 1);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;EE := Setze_Bauteil(RP_RAUM);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;WENN EE &amp;gt; 0 DANN&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;FUER EENr := 1 SCHRITT EENr := EENr + 1 BIS EENr = EE;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;iRet2 := Bauteil_Info(EENr);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;WENN iRet2 = 0 DANN&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;Vol1 := RP_RA_VOLUMEN;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;Vol1 := Vol1 / 1000000000;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;Format(4, DZ4.2);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;Text(4, Vol, Vol1);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;Ausgabe (1, RP_RA_NUMMER + &amp;#39;_&amp;#39; + RP_RA_NAME_2 + &amp;#39;_&amp;#39; + Vol);&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;ENDE&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;ENDE&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;ENDE&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;SCHLAUSGAB;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&lt;span style="color:#339966;"&gt;&lt;em&gt;ENDE&lt;/em&gt;&lt;/span&gt;&lt;br /&gt;&amp;nbsp;&amp;nbsp; &amp;nbsp;&lt;br /&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&lt;/p&gt;
&lt;p&gt;&lt;/p&gt;
&lt;p&gt;Ich hoffe jemand hat eine Idee, wo der Fehler begraben sein k&amp;ouml;nnte?&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;</description></item><item><title>speedikon Planteile mittels VBA verschieben</title><link>https://communities.bentley.com/products/building/building_analysis___design/f/aecosim-speedikon---forum-deutsch/128316/speedikon-planteile-mittels-vba-verschieben</link><pubDate>Fri, 11 Nov 2016 06:08:36 GMT</pubDate><guid isPermaLink="false">6dad98f5-dbc9-4c4d-a9ba-e9da8dc6aa8e:b65e09fc-e336-446c-a16d-70cda35f2204</guid><dc:creator>Mini</dc:creator><description>&lt;p&gt;Hallo,&lt;/p&gt;
&lt;p&gt;&lt;br /&gt;ist es m&amp;ouml;glich mittels VBA die Positionen einzelner Planteile in einer Plandatei auszulesen und dann zu verschieben?&lt;/p&gt;&lt;div style="clear:both;"&gt;&lt;/div&gt;</description></item></channel></rss>