how do you select a block by name?

[CADEveryDay]

On 2/1/2024 at 4:59 PM, BIGAL said:

Remove the select bname line and add your block name "asdf" where bname exists in the ssget and all done, rename the defun to something more useful.

(defun c:eblk ( / Block_name ss)
(setq ss (ssget "Block_name" '((0 . "INSERT")(cons 2 Block_name))))
(command "erase" ss "")
(princ)
)

I think I'm close with the attached code but its not quite there. If someone could explain what I'm doing wrong, I would appreciate it.

[BIGAL]

(defun c:eblk (Block_name / ss)
(setq ss (ssget "X" '((0 . "INSERT")(cons 2 Block_name)))
or

(setq ss (ssget "X" '((0 . "INSERT")(cons 2 Block_name)(cons 410 (getvar 'ctab))) ; current space only

 

Edited February 6, 2024 by BIGAL