문자 선택해서 똑같이 만드는 리습 질문이요

안녕하세요
매번 도와 주시는 수야12님께 감사 인사 드립니다.
mtext도 선택해서 똑같이 바꿔주는 리습입니다,,
몇일전에 두번 선택되는걸 고쳐 주셨는데, 다시한번 여쭤 보려구요

문자를 첫번째 선택할때 선택하는 느낌 (선택시 글자가 흐려지는 것 )이 안나오더라구요
바꾸려는 문자는 선택할때 흐려지는 느낌이 나는데요, 
첫번째 글자 선택시 선택한 느낌나오게 하려면  어떻게 해야 할까요?

또, 첫번째 선택한후에 스페이스바를 넣어서 구분 하고 싶은데 이것도 바꿀수 있을까요?

(defun c:ctt (/ #a #b #index )
(vl-load-com)
(setq #a(vla-get-textstring(vlax-ename->vla-object(car(entsel "nSelect text to match:")))))
(prompt "nSelect text to change")
(setq #b(ssget '((0 . "text,mtext"))))
(setq #index 0)
(repeat (sslength #b)
(vla-put-textstring(vlax-ename->vla-object(ssname #b #index))#a)
(setq #index(1+ #index))
);;repeat
);;defun