연속으로 파일 로드는 방법좀 알려주세요..

(defun c:12()
 (setq no(getstring “nDrawing NO. <반드시 대문자 사용> : “));T-121234
 (setq no2(getstring “nPage : “));001 – 010
 (setq a (substr no 1 1) b (substr no 1 4) c (substr no 1 6))
 (setq NN “C:\”)
 (setq kk
  (cond
    ((= a “T”) “Auto File\”)
    ((= a “G”) “”)
    ((= a “U”) “”)
    ))
  (setq ks (strcat NN a “\” kk b “\” c “\” no no2 “.dwg”))
 (vl-cmdf “vbastmt” (strcat “AcadApplication.Documents.Open (”” ks “”)”))
 (princ)(print)(prin1)
  )

현재 이렇게 해서 한 경로에 있는 파일을 로드하고 있는데요
도면이 L-12346001 – L123456010 이렇게 10개 도면이 순차적으로 있는걸
변수 no2에 001 – 010 이라고 치면
1번도면부터 10번도면까지 다 오픈할수 있는 방법이 있나요??