Kurzbeschreibung zum VBA-Programm: Fenster einfügen

Die Aufgabe des Fenster-Makros ist es möglichst leicht Fenster in bestehende Wände einzufügen.

Der Benutzer wählt die Fensterbreite, Fensterhöhe, Wandstärke, Parapethöhe, einen Glasabstand, Wandlayer und einen Fensterlayer. Dabei wird einen Liste aller in der Zeichnung vorhandenen Wandlayer und Türlayer im jeweiligen Pull-Down-Menü angezeigt. Diese Liste wird vom Administrator in einem File verwaltet.

Weiters wählt man „Fenster erstellen“ bzw. „Abbrechen“. In der Auto-CAD Zeichnung wird nun nach Wandaußenseite und einem Einfügepunkt gefragt. Dann wählt man einen 2. Punkt auf der anderen Wandseite (Innenseite). Mit der Eingabe einer dünneren Wandstärke und nicht der tatsächlichen Wandstärke erzielt man den Effekt, daß die Innseite bzw. Außenseite des Fensters nicht mit der Wand abschließt. Allerdings muß dann das fehlende Wandstück händisch ergänzt werden. Das Makro funktioniert auch bei nicht parallelen Wänden!!!

Nach der Wahl dieses Einfügepunktes zeichnet das Makro das gewählte Fenster in den richtigen Layern und fügt diese in die Wand ein, wobei gleichzeitig das jeweilige Wandsegment ausgeschnitten wird. Die Beschriftung des Fensters wird auf dem Layer TXT_BESCHR100 gezeichnet. Zum Schluß wird das soeben erstellte Fenster nun noch als Block in der Zeichnung angelegt.

zurück zur LTOOLs Übersicht