回 帖 发 新 帖 刷新版面

主题:delphi读取excel表内容问题请教??

在delphi中通过server的Excel组件来读取Excel表中的内容,
代码:
ExcelApplication1.Connect;
ExcelApplication1.Visible[0]:=false;
    try
    ExcelApplication1.Workbooks.Open(ExtractFilePath(paramstr(0))+'import.xls',null,null,null,null,null,null,null,null,null,null,null,null,0);
    except
    ExcelApplication1.Disconnect
    end;    
ExcelWorkbook1.ConnectTo(ExcelApplication1.Workbooks[1]);        ExcelWorksheet1.ConnectTo(ExcelWorkbook1.Worksheets[1] as _Worksheet);
   
   //ExcelWorksheet1.UsedRange.Rows.Count;想取行数,出错

遇到一些问题:
1、如果我想自己选择Excel文件打开,而不是当前目录下的指定文件;
2、用ExcelWorksheet1.UsedRange.Rows.Count;想取行数,但出错

请仁兄赐教!!!

回复列表 (共3个回复)

沙发

1.加个openDialog,
2.用法好象不对

板凳

谢谢!
但第二个不知怎么取行数?

第二个解决了:ExcelWorksheet1.UsedRange[0].Rows.count

3 楼

ding

我来回复

您尚未登录,请登录后再回复。点此登录或注册