Select text - open dwg

[kieren.aubrey]

Hi all,
I had this piece of code form a very helpful forum member some time ago.
However, I would like to know if this can be modified/adapted to also allow a block attribute to be selected, as well as regular dtext?

;;;---------------------------
(defun c:OPTEXT ( / TxtEnt FilePrefix FileName)
(setq TxtEnt (vla-get-textstring (vlax-ename->vla-object (car (entsel)))))
(setq FilePrefix (getvar "DWGPREFIX"))
(setq FileName (strcat FilePrefix TxtEnt ".dwg"))
(vla-activate (vla-open (vla-get-documents (vlax-get-acad-object))
FileName))
)
;;;--------------------

Many thanks,
HOLLY

[Kelie]

Change entsel to nentsel.

[kieren.aubrey]

Kelie,
Thank you VERY much!
You've literally just save my life on a Friday arfternnon!!

HOLLY