如何判别有效列?
我有一个有30列的表,在将EXCEL数据传送到表后,由于EXCEL的数据可能不到30列,我想判别究竟EXCEL的数据有多少列,请教各位? 问题点数:20、回复次数:1Top
1 楼apple_8180(十豆三)回复于 2005-04-01 11:34:40 得分 20
loXls = CREATEOBJECT("excel.application")
bookExcel = loXls.APPLICATION.Workbooks.OPEN("c:\111\temp.xls")
nrows=bookExcel.Worksheets('temp')
UsedRange =nrows.UsedRange
r = UsedRange.ROWS.COUNT &&行数
c = UsedRange.COLUMNS.COUNT &&列数
?'总行数:'+ALLTRIM(STR(r))
?'总列数:'+ALLTRIM(STR(c))
loXls.Workbooks.close
loXls.quitTop




