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

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

本帖最后由 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

账号		自动登录	找回密码
密码			注册

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

本帖被以下淘专辑推荐:

相关帖子