Habe eine Zeichnung auf der jede Menge Layer (255 verschiedene) vorhanden sind. Würde jetzt gerne mittels VBA alle Farben der Layer auf ByLayer setzten. Ist das irgendwie möglich?
Brischke Ehrenmitglied V.I.P. h.c. CAD on demand GmbH
Beiträge: 4201 Registriert: 17.05.2001
ACAD20XX, defun-tools
erstellt am: 22. Dez. 2005 09:59 <-- editieren / zitieren --> Unities abgeben: Nur für Hman
Zitat:Original erstellt von Hman: Habe eine Zeichnung auf der jede Menge Layer (255 verschiedene) vorhanden sind. Würde jetzt gerne mittels VBA alle Farben der Layer auf ByLayer setzten. Ist das irgendwie möglich?
Hallo Hman,
die Layerfarbeigenschaften können nicht auf ByLayer gesetzt werden. Jeder Layer benötigt irgendeine Farbeigenschaft. Falls du die ZeichnungsObjekte meinst, dann hechele dich einmal durch die BLOCK und bearbeite dann jedes Element eines BLOCK entsprechend. Dann sollte alles erledigt sein.
Grüße Holger
------------------ Holger Brischke CAD on demand GmbH Individuelle Lösungen von Heute auf Morgen.