Try this8 e6 w8 ?3 G c4 g6 Z, a. P
* M+ T& d6 M. x- p" ^0 B% |: j
(vla-SendCommand # Y6 o5 c M, f0 c5 b
(vla-get-ActiveDocument (vlax-get-acad-object)) . a# @- N# q! L% c+ o* m, A "Close "2 w% y) K' o/ N
)6 ^( `9 n m1 `# W, x L: C
" o J. u u( O: N/ @: @
================================ % f: G# H# t0 g6 [
+ A1 X# `/ z. V+ I
(command "Copy" (ssget) "" "M")