[文章]：求助，autocad和excel连接的问题

pppppp4053

请教各位高手，我编的一段文字
可是在vlisp中执行时一直提示：给保护符号赋值
请各位高手不吝指教
(defun aaa()
(vl-load-com)
(setq *AcadApp* (vlax-get-acad-object))   
(setq *ModelSpace* (vla-get-ModelSpace
  (vla-get-ActiveDocument *AcadApp*)))     

(if(equal nil msxc-x124hourclock)
  (vlax-import-type-library
    :tlb-filename "e:/program files/Microsoft Office/Office11/XL5CHS32.OLB"
    :methods-prefix "msxl-"
    :properties-prefix "msxp-"
    :constants-prefix "msxc-"
  )
  )
  
(setq msw (vlax-get-object "excel.Application"))
  (if (equal nil msw)
    (progn
      
      (setq msw (vlax-create-object "excel.Application"))
      (vla-put-visible msw :vlax-true)
         
  ) )

(defun DSX-Excel-Get-Cell (rng relrow relcol)
                        (vlax-variant-value
                        (msxl-get-item (msxl-get-cells rng)
                        (vlax-make-variant relrow)
                        (vlax-make-variant relcol)
                        )
                        )
                        )
                        
                        (defun DSX-Excel-Get-CellValue ( )
                        (setq lijian(vlax-variant-value
                        (msxl-get-value
                        (DSX-Excel-Get-Cell
                        (msxl-get-ActiveSheet xlapp)
                        6 "c"
                        )
                        ))
                        )
                        )

)