怎样得到Excel当前工作表（Sheet）包涵数据的最大行、列数？

[macula55]

使用delphi操纵Excel，使用 ExcelApplication、ExcelWorkbook、ExcelWorksheet！！！！！

用ExcelWorkbook装入：1.xls 文件，ExcelWorksheet设为ExcelWorkbook的第一张工作表，

1.xls工作表中包括20行70列数据。

我想用编程的方式得到ExcelWorksheet中包含数据的最大行数和列数（20、70）？？？？

[在vba中使用如下方法就可以：

ir = [a65536].End(xlUp).Row 行数
ic = [AZ1].End(xlToLeft).Column 列数

]

能告诉我在delphi中如何实现吗？

[muleo]

我只知道行：RowsCounts:=Fexcel.Application.Worksheets[SheetName].UsedRange.Rows.Count;

[jadehong]

xlscolcount:=exlapp.activesheet.UsedRange.Columns.count;//获得列数