liyamg 发表于 2013-4-15 21:43:36

已解决 [求助] vb调用excel函数如何改为lisp语句，重点在参数如何传递？

本帖最后由 liyamg 于 2013-4-16 21:38 编辑

l目的： isp 查询 保存在excel文件里的数据，并且调用excel 的函数命令
VB 很轻松地 写出如下命令：
b = Application.WorksheetFunction.Match(a, Worksheets("基本参数").Range("B1:B680"), 0）

lisp里 这句已经成功：
(setq fun (vlax-get-property XLobj 'WorksheetFunction))

下一句， 死活不会了：
(setq Wk (vlax-invoke-method fun 'match("北京" , Worksheets("基本参数").Range("A1:A680"), 0)))
主要是 如何给 match 传递参数，

哪位不吝赐教，谢谢

liyamg 发表于 2013-4-16 21:35:22

经请教 红日兄搞定了！改正 如下
(setq fanwei (vlax-get-property sheet-obj 'Range "A1:A680" ))
(setq Wk (vlax-invoke-method fun 'match "北京" fanwei 0))

jyzas 发表于 2013-8-1 07:34:10

支持

Exlw 发表于 2015-7-28 13:19:26

总感觉vlisp语句逆天

xiabin68 发表于 2015-8-13 07:26:15

页: [1]
查看完整版本: 已解决 [求助] vb调用excel函数如何改为lisp语句，重点在参数如何传递？