캐드 분류
각자 다른 도면에서 불러온 같은 이름의 블록이 한 도면에 들어올때 이름 자동으로 바뀌는 리습 있을까요?
컨텐츠 정보
- 327 조회
- 2 댓글
- 0 추천
- 0 비추천
- 목록
본문
고수님들, 질문이 있습니다.
예를들어 <도면1> 이라는 도면과 <도면2>라는 도면이 각각 있는데,
각 도면 안에 "축"이라는 이름의 각각 모형이 다른 블록이 있다고 치면,
두개를 새로운 도면 라는 도면으로 복사해 올때,
먼저 생긴 축이라는 블록만 유지되고, 나머지 도면2의 축이라는 블록은 원래 있던 도면1의 축으로 바뀌잖아요?
이걸 자동으로 이름을 바꿔줘서 모양이 바뀌지 않게 할수는 없나요?
관련자료
댓글 2
엔씨벤딩님의 댓글
붙여넣기하는 블록의 이름을 바꾸는건 사실상 어렵습니다. 이미 존재하는 블록의 이름을 랜덤하게 바꾸어놓고 붙여넣기 하는 것이 제가 아는한 유일한 방법입니다.
;;;;;;;;; 현재도면의 블록이름 변경하면서 paste 하기 – 리습코드 (defun c:bbt ( / txt op oDocument oblock txt2 d d1 t1 )
(vl-load-com) (setq d (rtos (getvar "cdate") 2 7)) (setq d1 (substr d 1 8) t1 (substr d 10 7) txt (strcat "_" d1 t1) );setq end (setq oDocument (vla-get-activedocument (vlax-get-acad-object))) (vlax-for oBlock (vla-get-blocks oDocument) (if (/= (substr (vla-get-name oBlock) 1 1) "*") (if (/= (substr (vla-get-name oBlock) 1 8) "MAT_DRAW") (progn (if ( > ( strlen (vla-get-name oBlock) ) 60 ) (setq txt2 (substr (vla-get-name oBlock) 1 40 ) ) (setq txt2 (vla-get-name oBlock) ) );if end (vla-put-name oBlock (strcat txt2 txt)) );progn end );if end ) ) (princ "n 블럭이름 변경 완료") (princ "n ") (princ ) (command "pasteclip" ) );defun end
=== 아래 코드는 MNS파일 만들어서 추가등록하시면 컨트롤B 단축키를 컨트롤V 단축키처럼 쓰게 해줍니다. MNS파일 설명은 구글에서 검색하시면 나옵니다. [CONTROL+"B"] BBT
$$$$$$$$$$$$$$ 결론 $$$$$$$$$$$ CTRL+C로 복사해서 CTRL+B로 붙여넣으면 됩니다. 단점 : 기존블록의 이름 뒷부분이 랜덤하게 변경됩니다.
