求助：EXCEL与cad的联系

jxcaixiaomeng

来学习的，                       

leshlie

因为楼主没说起始点，所以默认以上一个矩形的终点作为下一个矩形的起点
将excel处理后生成下图的数据，复制到命令栏内即可

kaka8009

EXCEL2cad的工具很多吧，论坛里找找

Klein

如果想完善点的，那就读取Excel内容

2. ;加载EXCEL类型库
   
3.   (setq XLobj (vlax-get-or-create-object "Excel.Application"))
   
4.   (setq Epath (vlax-get-property XLobj 'Path))
   
5.   (cond
   
6.     ((setq exlib (findfile (strcat Epath "\\EXCEL.exe"))))
   
7.     (T (alert "Excel程序未安装!") (quit))
   
8.   )
   
9.   (if (null MX-acos)  ;判断Excel资源库是否已被加载
   
10.     (vlax-import-type-library :tlb-filename exlib :methods-prefix "MX-" :properties-prefix "MX-" :constants-prefix "MX-")
    
11.   )

;加载EXCEL类型库<br />   (setq XLobj (vlax-get-or-create-object "Excel.Application"))<br />   (setq Epath (vlax-get-property XLobj 'Path))<br />   (cond <br />     ((setq exlib (findfile (strcat Epath "\\EXCEL.exe"))))<br />     (T (alert "Excel程序未安装!") (quit))<br />   )<br />   (if (null MX-acos)  ;判断Excel资源库是否已被加载<br />     (vlax-import-type-library :tlb-filename exlib :methods-prefix "MX-" :properties-prefix "MX-" :constants-prefix "MX-")<br />   )

这个一两句也讲不清楚，论坛里去找找，很多

zhbo_003

书到用时方恨少啊！！！