标题:如何获取EXCEL工作表列表?
只看楼主
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:396
帖 子:11713
专家分:43267
注 册:2006-5-13
结帖率:99.55%
已结贴  问题点数:20 回复次数:3 
如何获取EXCEL工作表列表?
在VFP中准备对EXCEL工作簿进行操作,但工作簿中的工作表数量预先未知,工作表的名称也没有规律,现在想自动获得工作表名称并存入数组中,不知哪位知道该如何操作?先谢谢各位回复的坛友!
搜索更多相关主题的帖子: EXCEL 列表 获取 
2009-09-14 09:55
hgfeng1984
Rank: 7Rank: 7Rank: 7
等 级:黑侠
威 望:5
帖 子:139
专家分:513
注 册:2006-3-26
得分:10 
TXLS_EOLE=CREATEOBJECT('Excel.application')
TXLS_EOLE.WorkBooks.OPEN(GETFILE('XLS'))
FOR i=1 to TXLS_EOLE.Sheets.count
?ALLTRIM(TXLS_EOLE.Sheets(i).name)
ENDFOR
TXLS_EOLE.Workbooks.close
TXLS_EOLE.quit
2009-09-14 10:28
sywzs
Rank: 10Rank: 10Rank: 10
来 自:辽宁
等 级:贵宾
威 望:15
帖 子:508
专家分:1725
注 册:2009-5-13
得分:10 
用 oExcel.WorkSheets.Count 获得工作簿中表的数量
用 oExcel.Sheets(I).Name 获得标的名称,其中 I 不大于 oExcel.WorkSheets.Count
2009-09-14 10:29
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:396
帖 子:11713
专家分:43267
注 册:2006-5-13
得分:0 
谢谢楼上两位!

活到老,学到老! http://www. E-mail:hu-jj@
2009-09-14 10:40



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-285672-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 1.081817 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved