怎么获取excel表格中数据有多少行多少列？

mingj76zw · 发表于 2011-10-9 09:46:32

本帖最后由 mingj76zw 于 2011-10-9 09:47 编辑

假如我有一数据表book1.xls，在e盘根目录下。现在我需要知道这个文件中sheet1中的数据有几行几列。请问我怎么实现？

Andyhon · 发表于 2011-10-9 12:51:34

楼主若是初涉 VLisp 不建议直接探讨这个环节 ...

若想挑战自己
http://www.atablex.com/

mingj76zw · 发表于 2011-10-9 13:12:14

Andyhon 发表于 2011-10-9 12:51
楼主若是初涉 VLisp 不建议直接探讨这个环节 ...

若想挑战自己

确实是才用这个vlisp,你给的那个网址全英文，难度太大噢了，不过还是谢谢了！

zoubo604 · 发表于 2011-10-9 16:04:05

学习一下LISP的实现方法,期待中....
VBA貌似实现容易点

snddd2000 · 发表于 2011-10-9 16:04:32

楼主了解excel的VBA吗？如果了解可以学习下面三个函数就可以玩转excel
vlax-invoke-method
vlax-get-property
vlax-put-property
祝早日学成

chpmould · 发表于 2011-10-9 17:00:55

很好的LISP操作EXCEL例子: http://www.atablex.com/htmls/vlxls-functions.htm

mingj76zw · 发表于 2011-10-9 17:13:45

snddd2000 发表于 2011-10-9 16:04
楼主了解excel的VBA吗？如果了解可以学习下面三个函数就可以玩转excel
vlax-invoke-method
vlax-get-pro ...

谢谢。我再好好研究下。

snddd2000 · 发表于 2011-10-10 16:41:04

本帖最后由 snddd2000 于 2011-10-10 16:41 编辑

顺便学习了一下，针对已打开的excel
(setq excelapp0 (vlax-get-object "Excel.Application"));;excel程序对象
(setq activeworkbook0 (vlax-get-property excelapp0 'ActiveWorkbook));;excel工作簿对象
(setq activesheet0 (vlax-get-property activeworkbook0 'ActiveSheet));;excel工作表对象
(setq range0 (vlax-get-property activesheet0 'range "A65536"));;A列最后一个单元格，03版
(setq endxluprow0 (vlax-get-property (vlax-get-property range0 'end -4162) 'row));;A列有数据的最后一行的行号

zdqwy19 · 发表于 2012-3-6 19:29:06

LISP-EXCEL作用太大了

LLXXZZ · 发表于 2012-3-6 21:48:59

挑战成功...

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