delphi中如何取得Excel总的数据集的个数

Question

delphi中如何取得Excel总的数据集的个数？？

Answer 1

var
  EA:variant;
  i:integer;
begin
  EA:=CreateOleObject('Excel.Application');
  EA.workbooks.open('c:\excalfilename.xls');
  
  for i:=1 to EA.workbooks[1].worksheets.count do//SHEET个数
  begin
    EA.workbooks[1].worksheets[i].name);//SHEET名字
  end;

Answer 2

c:=ExcelApp.Sheets[j].UsedRange.Columns.Count;  //列
r:=ExcelApp.Sheets[j].UsedRange.rows.Count;  //行

Answer 3

用ADO连接Excel,不是想取什么就可以取什么么?————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 4

CSDN尚有很多关于这样的问题！
搂住可以试试查找一下。
我不用从复的写出来了吧！