该如何读单元格数据?
解决方案 »
- 关于 TidTcpServer cpu占用率过高的问题
- 为什么执行 ShellExecute(0, 'open', PChar('del c:\123.txt'), nil, nil, sw_show)之后,啥反应也没有
- 公司里面第三方控键用哪些?
- 谁能提供DELPHI5和DELPHI6的下载地址?回复者有分
- 如果实现数据库中相关联的两个表显示在treeview中????
- 请教delphi中IntToBin和BinToInt是用来做什么的
- 我将一个VCL转换为一个ActiveX时有一个Images属性不见了
- 菜鸟提问:函数的参数的默认值?在线等待。
- windows启动过程的问题,大家快来看!
- 关于程序设计语言中“流”的问题
- TreeView怎样存进SQL数据库?
- 请问,用什么函数可把float型转换成int?
showmessage(excelapp.application.activesheet.cells[3,2].value);
str :string;
...
str := excelworksheet1.Cells[1,1];
ExlApp := CreateOleObject('Excel.Application');//创建Excel.Application
ExlApp.WorkBooks.Add;//新加一个工作簿
ExlApp.WorkSheets[1].Activate; //激活第一个Sheet
ExlApp.Cells[3,4].Value:='AAA';
s:=ExlApp.cells[3,4];//注意不是(),是[]
s:=ExlApp.cells[3,4];//注意不是(),是[]
s:=ExlApp.cells[3,4];//注意不是(),是[]
s:=ExlApp.cells[3,4];//注意不是(),是[]
s:=ExlApp.cells[3,4];//注意不是(),是[]
s:=ExlApp.cells[3,4];//注意不是(),是[]