( if(and(setq a(tblobjname "BLOCK" "Leiter"))
(=(logand(cdr(assoc 70 (entget a)))4)4) ;Test, ob XREF
)
(command"-xref""p""Leiter""\\\\server\\Projekt1\\Leiter.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