求数据写入EXCEL

革天明 · 发表于 2012-9-24 17:59

sscylh 发表于 2012-9-24 17:48
打开vbe编辑器,工具--引用--microsoft excel object libiray

谢谢你了！我回去试一试

sscylh · 发表于 2012-9-24 18:05

革天明发表于 2012-9-24 17:59
谢谢你了！我回去试一试

嗯,如果可以的话,100大洋..............

革天明 · 发表于 2012-9-25 08:11

sscylh 发表于 2012-9-24 18:05
嗯,如果可以的话,100大洋..............

100大洋没问题，我引用的是Microsoft Excel 14.0 Object Library
XP系统，Office 2010，
目前程序运行后无反应。本人对VBA不是太熟悉，你是否能写成模块，如追加数据模块，读取最后一行行号模块、删除指定行数据模块，我使用是调用就好了？

革天明 · 发表于 2012-9-26 08:12

sscylh 发表于 2012-9-24 18:05
嗯,如果可以的话,100大洋..............

版主，程序运行无反应，
我的环境是XP Office 2010，已加载office library

srv2 · 发表于 2012-9-26 09:44

无意看到个 Excel 存取函数, 希望能帮上点忙.

http://web2.airmail.net/terrycad/LISP/GetExcel.lsp

sscylh · 发表于 2012-9-26 15:06

革天明发表于 2012-9-26 08:12
版主，程序运行无反应，
我的环境是XP Office 2010，已加载office library

我用的是win7+03.

革天明 · 发表于 2012-9-26 16:28

sscylh 发表于 2012-9-26 15:06
我用的是win7+03.

是了，确实能运行，不过我说的三个接口是否可以帮我改写一下？
如何继续追加内容？如何得到最后一行的行号？如何删除指定行？
我主要使用LISP，所以请求你将接口写一下，不然我还是没有办法调用的

sscylh · 发表于 2012-9-26 18:31

表示有点意外,居然被选作最无佳,感觉应该还有一些不要合要求的地方
比如insertrow,只给了三个提示框,只输入三个,事实上,楼主的字段数可能多于三个,所以如果有其他要求需要变更的,请发短信息

革天明 · 发表于 2012-10-6 10:59

smartstar 发表于 2012-9-20 08:17
;|
vlxls-variant->list

请教您是如何获得EXCEL最后一行的行号，只要A列的最后一行行号
A列中间若有空白则空白处不认为是最后一行

smartstar · 发表于 2012-10-6 11:14

本帖最后由 smartstar 于 2012-10-6 11:15 编辑

革天明发表于 2012-10-6 10:59
请教您是如何获得EXCEL最后一行的行号，只要A列的最后一行行号
A列中间若有空白则空白处不认为是最后一行 ...

用我提供的函数获得excel的数据表，求的表的长度m，在把表倒置，用循环确定第n个表元素的car值不为空，则A列的最后一行就为m-n+1

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