block editor path shortcut

[Anonymous]

Could a .lsp file work with the block editor so that double-clicking a block will make it skip straight to the editor without displaying the "Edit Block Reference" dialoge?

[aqdam1978]

Hi,

Try this:

;Block Editor shortcut
;written by Abbas Aqdam
(defun c:BBE ( / e obj )
  (while (/=(type(setq e (car(last(nentsel "\nSelect any BLOCK to edit: "))))) 'ENAME))
	(setq obj (vlax-ename->vla-object e))
	(if  (= (vlax-get-property obj 'ObjectName) "AcDbBlockReference")
	  (command "_.BEDIT" (vlax-get-property obj 
		(if (vlax-property-available-p obj 'effectivename)'effectivename 'name))
	  );command
	);if
);defun

hope to helps 

Abbas