wowan1314 发表于 2022-12-16 21:48:38

优秀，非常优秀

vip-happy 发表于 2023-1-9 12:57:54

本帖最后由 vip-happy 于 2023-1-10 11:44 编辑

现学没学会，写入不成功，麻烦看一下怎么回事

(defun Lst2Range (fn lst / e rg sh tp ws)
(setq e(vlax-get-object "excel.Application")
      ws(vlax-invoke-method (vlax-get-property e "workbooks") "open"(findfile fn))
      sh(vlax-get-property (vlax-get-property ws "sheets") "item" 1)
      tp(vlax-get-property sh "range" "a1")
      rg(vlax-get-property tp "resize" (length lst) (length(car lst)))
)(vlax-put-property rg "value2" (hs-Lst2Arr2 lst))
(vlax-invoke-method ws "close" :vlax-true)
)

Klein 发表于 2023-1-10 15:44:20

我就是只会逐行读取处理，先收藏，慢慢学习

谢雷锋 发表于 2023-4-6 19:09:00

牛逼的

丶吟游诗人灬 发表于 2023-4-8 21:05:45

一直很好奇和尚大佬是不是个妹子真的特别厉害!
页: 1 2 3 4 [5]
查看完整版本: vlisp以数组读写excel 超快