Re: How do you most easily copy a group of selested entities from one alyer to ano
by briansalt@[EMAIL PROTECTED]
Apr 2, 2007 at 04:27 AM
Perhaps this small lisp would help?
(defun C:CL (/ ss e n)
(princ "Change Layer of Objects...\n")
(setq ss (ssget))
(if ss (progn
(setq e (car (entsel "PICK an object on the desired layer: ")))
(if e (progn
(setq e (entget e))
(setq n (cdr (assoc 8 e)))
(command "CHANGE" ss "" "PROP" "LAYER" n "")
))
))
)
In article <rZwPh.27$Ya1.18@[EMAIL PROTECTED]
>, jens.bjoern@[EMAIL PROTECTED]
(Jens
Bjørn) wrote:
> *From:* "Jens Bjørn" <jens.bjoern@[EMAIL PROTECTED]
>
> *Date:* Sat, 31 Mar 2007 19:34:15 +0200
>
> if you could tell me that i would like to hear from you,
>
> regards Jens.
>
> --------------------------------------------------------------------
> --------
> ----
> Jeg beskyttes af den gratis SPAMfighter til privatbrugere.
> Den har indtil videre sparet mig for at få 2923 spam-mails
> Betalende brugere får ikke denne besked i deres e-mails.
> Hent en gratis SPAMfighter her.
>
>
