如何用ComObj取得一个Excel文件的行数和列数?

lhb2000 2005-09-20 09:57:02

如何用ComObj取得一个Excel文件的行数和列数?我这样用
ExcelID.WorkSheets[i].Columns.Count
ExcelID.WorkSheets[i].Rows.count
得到的始终是256和65536

...全文

126 4 打赏收藏转发到动态举报

写回复

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

hellolongbin 2005-09-20

打赏
举报

回复

别忘了结贴 ^_^

lhb2000 2005-09-20

打赏
举报

回复

可以了谢谢

hellolongbin 2005-09-20

打赏
举报

回复

ExcelID.WorkSheets[i].Columns.Count得到是默认值，要想得到用了多少行和列，用
ExcelID.WorkSheets[i].UsedRange.Columns.Count试试
ExcelID.WorkSheets[i].UsedRange.Rows.count

lhb2000 2005-09-20

打赏
举报

回复

结贴

说明：程序中使用OLE来操作EXCEL。需要在uses中写上ComObj. 使用属性来获取行数和列数：使用代码1提供的代码获取的excel中的行数和列数，不包括开头的空行和空列。 1TemperMaxRows:=ExcelApp.worksheets[1].Usedrange.Rows.count;{代码1}2Tempe...

使用代码1提供的代码获取的excel中的行数和列数，不包括开头的空行和空列。 1 TemperMaxRows := ExcelApp.worksheets[1].Usedrange.Rows.count; {代码1} 2 TemperMaxcolumns:= ExcelApp.worksheets[1].Usedrange.columns.count; 一) 使用动态

两种方法,一是用ADO连接,问题是Excel文件内容要规则,二是用OLE打开,但操作就没有象操作数据库那么方便了. 一、用ADO连接：设置属性ConnetionString 选择 Microsoft Jet 4.0 OLE DB provider Select or enter a datasorce name -> 选择你要打开Excel文件 User name默认是A

( 一 ) 使用动态创建的方法 uses ComObj; 首先创建 Excel 对象Var ExcelApp : Variant ; ExcelApp := CreateOleObject ( '' Excel.Application '' ) ; 得到 Excel 的行数和列数ExcelApp.worksheets[1].usedrange.rows.countExcelA...

uses ComObj; var Excel: OleVariant; MaxRow,MaxCol: integer; begin try Excel := CreateOLEObject(Excel.Application); except ShowMessage(Ex

5,388

社区成员

262,729

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章