请问使用ComObj时如何动态指定Execl文件中的某个Sheet?
假设一个Excel文件中有如下几个Sheet:aaaa,bb123,kkkk,abkks,只知道它们的名字而不知道它们的顺序(即不能用WorksSheets[1],WorksSheets[2]之类的方法),我的要求是由用户指定一个Sheet,显示它的第一行第一列的内容。
例如:
…………
sX := Edit1.Text; //这里由用户手工输入"aaaa"
ShowMessage(ExcelApp.WorksSheets[sX].Cells[1,1].Value);
........
这段代码会出错:"Method 'WorksSheets' not Supported by automation object"
但如果直接指定Sheet:
…………
ShowMessage(ExcelApp.WorksSheets['aaaa'].Cells[1,1].Value);
........
就能正常运行
请高手指点一下,这段应该怎么写?
假设一个Excel文件中有如下几个Sheet:aaaa,bb123,kkkk,abkks,只知道它们的名字而不知道它们的顺序(即不能用WorksSheets[1],WorksSheets[2]之类的方法),我的要求是由用户指定一个Sheet,显示它的第一行第一列的内容。
例如:
…………
sX := Edit1.Text; //这里由用户手工输入"aaaa"
ShowMessage(ExcelApp.WorksSheets[sX].Cells[1,1].Value);
........
这段代码会出错:"Method 'WorksSheets' not Supported by automation object"
但如果直接指定Sheet:
…………
ShowMessage(ExcelApp.WorksSheets['aaaa'].Cells[1,1].Value);
........
就能正常运行
请高手指点一下,这段应该怎么写?
解决方案 »
- 为什么我在设置 auAutoUpgrader 自动升级,打开软件后。是可以升级了。但升级了一次又
- 一個查詢速度的問題
- 如何删除动态产生的tabsheet,谢谢!
- 请问FieldByName('yjf').AsInteger:=Ceil(FieldByName('jis').AsInteger * x);为什么报错 Undeclared identifier: 'Ceil'
- 【高人来帮我】应该说是很简单的查询语句,但真正做起来为什么就不行呢?
- IDHttp如何获取GOOGLE的网页?
- delphi查询问题(急需)
- 新手求一个出入法安装和删处的完整代码
- 菜鸟问题:delphi7.0是不是可以跨操作平台编程啊?
- 怎么让自己的信息显示在DrawGrid中??
- 如何在程序关闭其他程序
- 有什么函数能够返回字符串中指定字符的个数呢?
if ExcelApp.WorkBooks[1].WorkSheets[i].Name = '123' then