---

Hallo. Folgendes Problem.
Ich habe in manchen Zeichnungen sehr viele Seiteneinrichtungen.
Weis jemand, wie ich diese mit einem Schlag alle löschen kann.
Vieleicht mit einem Makro?
Wir arbeiten mit 2006LT.
Vielen Dank
Gruss Jürgen.
   

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

in der Vollversion kann man das mit
(defun C:PLOTCONFIG-DELALL(/)
  (vl-load-com)
  (vlax-for ITEM (vla-get-PlotConfigurations
                    (vla-get-ActiveDocument(vlax-get-acad-object))
                 )       
     (vl-catch-all-error-p   
       (vl-catch-all-apply
          'vla-delete (list ITEM)
       )        
     )
  )
)
erledigen. In LT mit Extender sollte
(defun c:Pagesetup-del-all(/ SETUPS DUMMY)
  (setq SETUPS (entget (cdr (assoc 350(member '(3 . "ACAD_PLOTSETTINGS")(entget (namedobjdict)))))))
  (entmod(vl-remove-if '(lambda(X)(member(car X)'(3 350)))SETUPS))
  (princ)
)
funktionieren und in LT pur hilft vielleicht ein automatisertes WBLOCK der ganzen Zeichnung mit anschließendem umbenennen der Ergebnis-dwg.

------------------
  - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP