Hallo zusammen,
bei uns haben wir den Ansatz über den Block gewählt. Zum bereinigen benutzen wir neben dem Standardschalter auch einen eigenen, der die Zeichnung eben bis auf die von uns benötigten Layer, Stile und anderen Elemente komplett bereinigt. Dafür benötigt man zunächst eine Zeichnung "bereinigen.dwg", welche die benötigten Elemente, z. B. Linien auf den Firmenlayern, Bemaßungen und Texte in den entsprechenden Stilen oder auch die wichtigsten Linientypen enthält. Diese wird dann in einem Supportordner von AutoCAD, z. B.
c:\Benutzer\Benutzername\AppData\Roaming\Autodesk\AutoCAD 20xx\Rxx.x\deu\Support
abgelegt. Seinen eigenen Suchpfad kann man in den AutoCAD-Optionen im Register "Dateien" unter dem obersten Punkt "Suchpfad für Support-Datei" nachlesen.
Jetzt braucht man noch den eigenen Schalter, welcher folgendes Makro bekommt:
^C^C_layon;-layer;se;0;;_insert;bereinigen;0,0;;;;-bereinig;_all;;n;;_all;;n;;_all;;n;_erase;_last;;_layerp;-bereinig;bl;;n;;bl;;n;;bl;;n;
Dieser bewirkt folgendes:
1) ^C^C_layon;
Ein evtl. aktiver Befehl wird abgebrochen und alle Layer werden eingeschaltet.
2) -layer;se;0;;
Der Layer Null wird aktuell gesetzt, da er in jeder Zeichnung vorhanden ist.
3) _insert;bereinigen;0,0;;;;
Jetzt wird auf diesem Layer die Zeichnung "bereinigen.dwg" als Block eingefügt. Dies kann ohne Dialogfeld ablaufen, da sich die Zeichnung "bereinigen.dwg" ja in einem Supportordner von AutoCAD befindet und somit vom Befehl "_insert" direkt gefunden wird. Auf diesem Weg kommen die eigenen Firmenstandards in die Zeichnung.
4) -bereinig;_all;;n;;_all;;n;;_all;;n;
Die Zeichnung wird nun dreimal komplett bereinigt, um auch verschachtelte Elemente, z. B. überflüssige Blockdefinitionen zu entfernen.
5) _erase;_last;;
Das zuletzt erstellte Element, also der Block "bereinigen.dwg", wird gelöscht. Somit verbleiben keine Zeichnungselemente, welche nicht zur eigentlichen Zeichnung gehören, zurück.
6) _layerp;
Der Layer, welcher vor dem Layer Null aktuell war, wird wieder aktuell gesetzt.
7) -bereinig;bl;;n;;bl;;n;;bl;;n;
Die jetzt nicht mehr benötigte Blockdefinition "bereinigen.dwg" wird nun selbst bereinigt, auch evtl. vorhandene verschachtelte Elemente.
Auf diese Weise kann auf Knopfdruck bis auf die gewünschten Firmenstandards bereinigt werden. Diese können so auch wieder hergestellt werden.
mfg, Ingo
------------------
"Umwege erhöhen die Ortskenntnisse!"
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP