초고수님들 혹시 면적구한걸 엑셀로…. 넘기는 방법 없습니까?
드림을 쓰라니 뭘쓰라니 하시묜 안되요 ….정품이외에 못깝니까~
회사라서 ㅠ.ㅠ ~
제질문은 면적이 한 천개넘어가면 (<<요건 리습으로 찍으면 텍스트 고정 바로 바운다리 생기면서 텍스트 박힙니다~ 제가 쓰는 리습 은 (defun c:ff ()
(setq ds (getvar “dimscale”))
(setq ss (getpoint “n 면적 구할 곳(Boundary 생김): “))
(command “boundary” ss “”)
(command “area” “o” “l” “”)
(setq di1 (getvar “area”))
(setq di2 (* di1 1)) : 1000으로 나눈기
(setq di4 (strcat (rtos di2 2 0)));단위수조절
(prompt (strcat “nEL. : ” di4))
(command “text” pause (* ds 30) “” di4) )
; (princ “n☞ <<결과를 출력할 TEXT를 선택>>”)
; (setq idtt_i3 0)
; (while (= idtt_i3 0)
; (setq idtt_e11 (entget (car (entsel))))
; (if (=(cdr (assoc 0 idtt_e11)) “TEXT”)
; (setq idtt_i3 1)
; (princ “n TEXT가 아녀요 다시 선택하세요”)
; )
; )
; (setq idtt_e12 (assoc 1 idtt_e11))
; (setq idtt_e11 (subst (cons 1 di4) idtt_e12 idtt_e11))
; (entmod idtt_e11)
; (princ “n”)
; )
이거이구요 근데 사람이란게 면적다구하고 꼭 한두개 빠져먹드라구요 ㅠ.ㅠ
엑셀로 일일이 치기도 힘들고 ㅠ.ㅠ 고수님들 엑셀로 넘기는 방법이 오로지 노가다 밖에 없습니까?ㅠ.ㅠ
꼭좀부탁드립니다