llsheng_73 发表于 2013-12-21 00:07:31

本帖最后由 llsheng_73 于 2013-12-21 00:08 编辑

(defun vlxls-get-cell(obj row col / item cells);;;网上找的，不过忘了从哪里找了的，相信大神们都能看出它来自哪里
(setq item (vlax-get-property
               (setq cells(vlax-get-property obj "Cells"))"Item"(vlax-make-variant row)
               (vlax-make-variant col)))
(vlax-release-object cells)
(vlax-variant-value item))

yxh1202 发表于 2013-12-23 14:22:00

llsheng_73 发表于 2013-12-21 00:07 static/image/common/back.gif
(defun vlxls-get-cell(obj row col / item cells);;;网上找的，不过忘了从哪里找了的，相信大神们都能看出 ...

能给个范例吗

yxh1202 发表于 2013-12-26 08:17:15

llsheng_73 发表于 2013-12-21 00:07 static/image/common/back.gif
(defun vlxls-get-cell(obj row col / item cells);;;网上找的，不过忘了从哪里找了的，相信大神们都能看出 ...

你好，我昨晚在一个外国网站上看到这个，可能有帮助，但是不会结合我的要求达到目的：
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=108667&page=1&extra=#pid620734

渠辉 发表于 2022-7-26 07:26:59

;; (excel-getcell 1 2)
(defun excel-getcell (row col)
(setq        excel (cond ((vlax-get-or-create-object "ket.application"))
                  ((vlax-get-or-create-object "execl.application"))
              )
        sht   (vlax-get excel 'activesheet)
)
(variant-value
    (vlax-get-property
      (vlax-variant-value
        (vlax-get-property
          (vlax-get-property sht 'cells)
          'item
          row
          col
        )
      )
      'value2
    )
)
)

yxh1202 发表于 2022-7-27 22:41:40

渠辉 发表于 2022-7-26 07:26


谢谢你时隔几年还回帖指导
页: 1 [2]
查看完整版本: 难以逾越，变量取得excel单元格数据，请教高手