sjj 发表于 2013-7-6 08:56:50

如何将数据写入打开的EXCLE表格中?

本帖最后由 sjj 于 2013-7-6 09:14 编辑

第一组数据写入EXCLE光标所在行
接着下一组写入下一行
不断循环直至写完所有数据

要求每一组数据中各个数据在不同的列

陨落 发表于 2013-7-6 09:47:15

可以办到的

sjj 发表于 2013-7-6 12:01:41

请教前辈LISP代码如何写?

jdlfjk 发表于 2013-7-6 13:06:29

用COM接口完成

sjj 发表于 2013-7-7 11:33:42

终于完成了,是在论坛上找的程序修改而成的
现在只能开EXCLE 新窗口,觉得可以了
可能在现有的窗口写入更复杂吧?

陨落 发表于 2013-7-7 16:35:22

最近比较忙,给你贴一段我自己写的,获得当前打开的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]
查看完整版本: 如何将数据写入打开的EXCLE表格中?