如何将数据写入打开的EXCLE表格中?
本帖最后由 sjj 于 2013-7-6 09:14 编辑第一组数据写入EXCLE光标所在行
接着下一组写入下一行
不断循环直至写完所有数据
要求每一组数据中各个数据在不同的列 可以办到的 请教前辈LISP代码如何写? 用COM接口完成 终于完成了,是在论坛上找的程序修改而成的
现在只能开EXCLE 新窗口,觉得可以了
可能在现有的窗口写入更复杂吧? 最近比较忙,给你贴一段我自己写的,获得当前打开的excel中选中单元格的代码,excel版本为excel2010:
(vl-load-com)
(setq mysp (vla-get-modelspace (vla-get-activedocument (vlax-get-acad-object))))
(if (null lem-acos)
(vlax-import-type-library
:tlb-filename "D:/office/OFFICE14/excel.exe"
:methods-prefix "lem-"
:properties-prefix "lep-"
:constants-prefix "lec-"
))
(setq xlobj (vlax-get-or-create-object "excel.application.14"))
(setq rangeob1(lep-get-Selection xlobj))
页:
[1]