엑셀에서 값을 가져와 리습에 적용하는 방법

아래리습은  폭과 깊이를 입력받아 사각형을 그리는 리습(DDad)입니다.
이리습의 폭깊이를 엑셀에 입력해서 선택하고
이를 리습으로 불러와서 간격1000씩 이동해서 순차적으로 그릴려고 합니다.
DDad2는 그렇게 할려고 하는데 엑셀에서 데이터를 어떻게 가져올수 있을까요?



;;===============DDad==========================
(defun C:ddad()
 (setq b (getint “폭(B) :”))    ;;폭입력
  (setq h (getint “깊이(H) :”))    ;;깊이입력
  (setq p0 (getpoint “기준점 :”))   ;;기준접입력
(defun dtr(a) (* pi (/ a 180.0))) ;각도 변환
(setq p1  (polar p0 (dtr 0.0) b))   
(setq p2  (polar p1 (dtr 90.0) h))   ;;우상단기준점
 
  (command “rectang” p0 p2)  ;;사각형그리기
 
  )
  
  ;;===============DDad2==========================
  
  (defun C:ddad2()
 ;;(setq b (getint “폭(B) :”))    ;;폭입력
 ;; (setq h (getint “깊이(H) :”))    ;;깊이입력

;;엑셀에서 B H연속으로 읽어와 사각형그리기

 (repeat no     ;반복   no는 엑셀에서 가져옮
  (setq p0 (getpoint “기준점 :”))   ;;기준접입력

(defun dtr(a) (* pi (/ a 180.0))) ;각도 변환
(setq p1  (polar p0 (dtr 0.0) b))   
(setq p2  (polar p1 (dtr 90.0) h))   ;;우상단기준점
 
  (command “rectang” p0 p2)  ;;사각형그리기
 
    (setq p0 (polar p0 (dtr 0.0) 1000))  ;기준점 좌표 1000이동
 
 
  )
  )