wgq2808 发表于 2010-9-3 20:53:00

excel单元格坐标

怎么写返回EXCEL当前单元格行号，列号的LISP命令

半夜星星 发表于 2018-2-26 15:26:31

这个我也想知道，哪位空弄一下啊

自贡黄明儒 发表于 2018-2-26 15:32:11

http://bbs.mjtd.com/search.php?mod=forum&searchid=277&orderby=lastpost&ascdesc=desc&searchsubmit=yes&kw=vlsp%B2%D9%D7%F7Excel%BA%AF%CA%FD%B4%F3%C8%AB

半夜星星 发表于 2018-2-26 16:30:24

没找到，太菜了，可否直接一点

半夜星星 发表于 2018-2-26 16:54:33

(Defun vlxls-range-getID (range / col row dx dy)
(setq dx(vlxls-get-property range "MergeArea.Rows.Count")
      dy(vlxls-get-property range "MergeArea.Columns.Count")
      row (vlxls-get-property range "MergeArea.Row")
      col (vlxls-get-property range "MergeArea.Column")
)
(strcat (vlxls-rangeid (list col row)) ":" (vlxls-rangeid (list (1- (+ col dy)) (1- (+ row dx)))))
)


(defun c:tt ()
      (vlxls-range-getid RangeObject)
)
这里出错呢
页: [1]
查看完整版本: excel单元格坐标