delphi读取excel的内容，如何知道excel中有效的行列数？

Question

我用delphi7读excel文件，用了excel2000控件，数据可以
通过cells[x,y]属性读出来，但excel有效行列数不知如何确定？
另外，哪位大虾有excel2000调用的帮助全套，delphi7使用相关
对象时，没有提示。只能凭感觉输入。

Answer 1

在VB_Script中：ActiveCell.SpecialCells(xlLastCell).Select
在Delphi中，是类似的，楼主别告诉我你不会写！！！呵呵

Answer 2

请参考以下文章及其相关文章： 
 
    excel 如何用代码知道当前表格有多少行? 
    http://access911.net/?kbid;72FAB11E11DC 
 

Answer 3

ActiveCell.SpecialCells(xlLastCell).Select
  MsgBox ("最大行数：" + Str(ActiveCell.Row))
  MsgBox ("最大行数：" + Str(ActiveCell.Column))

Answer 4

//取得最大行数
    XLApp.ActiveCell.SpecialCells(xlLastCell).Select;
    maxRow:=XLApp.ActiveCell.Row;       //最大行数
    maxCol:=XLApp.ActiveCell.Column ;   //最大列数看看我的Blog :    http://www.cnblogs.com/LuckyJan/category/13329.html   其中《 Delphi与Excel（一） 》

Answer 5

用copyfromrecordset一切搞定，后面只要sql好就ok

Answer 6

ExcelApp.ActiveSheet.UsedRange.Rows.Count;