문자를 일괄 변경하고싶습니다.
원본 문자 선택 후 변경할 문자 선택하여 변경하는 리습이나.
순서대로 하나씩 변경하는 리습이 아닌..
변경할 문자 쭉~~선택하여 변경하려는 문자입력하여 일괄적으로 한번에 변경할수있는
리습없을까요..?
예를들어 여러문자를 0 으로 변경하려고하는데…
일괄적으로 원하는 문자로 바꿔주는 리습은 못찾겠습니다.
혹시 리습있으신분은 공유좀 부탁드려요..ㅠㅠ
플강Lv.0
문자 선택후 똑같은 문자로 일괄변경 리습 없나요?
공유
원본문자와 교체문자를 선택해서 변경하거나 올드문자 신규문자 찾아서 변경하는건 있는데..
여러문자 선택해서 다 똑같은 글씨로 그냥 뿅 바꾸는건없더라고요.
원본문자와 교체문자 선택해서 변경하는 리습을 사용해도되지만
교체문자가 도면상에없어 도면상에 교체문자를 기입해야하는 번거로움을 줄이고자 찾아보고있습니다.
구글 검색해서 한번 찾아보겠습니다.
감사합니다. ^^
메론님 너무 감사합니다 ^^
A를 B로 변경하려면 A선택후 B를 선택해야하는데
A를 선택해서 제가 B라고 직접 입력하는 리습이 없나해서 찾아보고있었습니다.^^
제가 직접 변경문자를 입력할수있게 수정은 안될까요?;;
넘 뻔뻔한것같아 죄송합니다..ㅠㅠ
정말 제가 원하던 리습입니다.
상큼메론님 너무너무 감사합니다.
저 죄송하지만 부탁이 하나 더있습니다..;;
텍스트 줄간격으로 정렬하는 리습이있는데.
소수점으로 간격을 정리하고싶은데 소수점은 기입이 안됩니다.
소수점 기입할수있게 리습 수정이 가능할까요?
ex)3.6 이렇게 입력하고싶은데 안되네요..
;;; 텍스트 줄간격 맞추기 ;;;;
(defun c:tdd ( / sel_txt al_pt1 al_pt2 al_pt3 index n ch_txt1 ch_txt2 ins_pt ref_pt sort sorti m i ins_ypt)
(prompt “n정렬할 문자 선택 : “)
(setq sel_txt (ssget ‘((-4 . “<or”)
(0 . “TEXT”) (0 . “MTEXT”)
(-4 . “or>”)
)
)
)
(or ##txtline_gap (setq ##txtline_gap 10))
(setq ##txtline_gap
(cond
((getint (strcat “nSpecify Text offset <” (vl-princ-to-string ##txtline_gap) “>: “)))
(##txtline_gap)
)
)
(setq index 0)
(setq n (sslength sel_txt))
(repeat n
(setq ent (ssname sel_txt index))
(setq prop_ent (entget ent))
(setq in_point (cdr (assoc 10 prop_ent)))
(setq sort (append sort (list in_point)))
(setq index (1+ index))
)
(vl-load-com)
(setq sorti
(vl-sort-i sort
(function (lambda (e1 e2) (> (cadr e1) (cadr e2))))
)
)
(setq m 0)
(repeat n
(setq i (nth m sorti))
(setq ch_txt1 (ssname sel_txt i))
(setq ch_txt2 (entget ch_txt1))
(setq al_pt1 (cdr (assoc 72 ch_txt2)))
(setq al_pt2 (cdr (assoc 73 ch_txt2)))
(if (and (= al_pt1 0) (= al_pt2 0))
(setq ins_pt (cdr (assoc 10 ch_txt2)))
(setq ins_pt (cdr (assoc 11 ch_txt2)))
)
(if (= m 0)
(progn
(setq ins_xpt(car ins_pt))
(setq ins_ypt(cadr ins_pt))
)
(princ)
)
(setq ins_pt (- ins_ypt (* ##txtline_gap m)))
(setq ins_pt (list ins_xpt ins_pt ))
(if (and (= al_pt1 0) (= al_pt2 0))
(progn
(setq ch_txt2 (subst (cons 10 ins_pt) (assoc 10 ch_txt2) ch_txt2)) ;;; 이게 중요함 10코드를 뽑아서 11번 코드로 넣어줘야 됨 ;;;
(entmod ch_txt2)
)
(progn
(setq ch_txt2 (subst (cons 11 ins_pt) (assoc 11 ch_txt2) ch_txt2)) ;;; 이게 중요함 10코드를 뽑아서 11번 코드로 넣어줘야 됨 ;;;
(entmod ch_txt2)
)
)
(setq m (1+ m))
)
)
find 명령어로는 안될까요??
크오오!!!
감사합니다!!!!
너무 감사해요
정말 잘되네요 🙂