首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > VB Dotnet >

关于execl解决方案

2012-01-06 
关于execl我想在导入execl时实现在不知道有多少行与列的情况下做循环,请高手指点一二[解决办法]你可以做次

关于execl
我想在导入execl时实现在不知道有多少行与列的情况下做循环,请高手指点一二

[解决办法]
你可以做次循环,先取到第一行有数据的单无格总数,然后同理,再取第一列的有数据的单元格总数,这样在后面的循环中就按照刚取出来的值做循环了

注意:列最大值为255,行最大值为65535
[解决办法]
Dim excelApp As New Excel.Application()
Dim excelBook As Excel.Workbook = excelApp.Workbooks.Add
Dim excelWorksheet As Excel.Worksheet = CType(excelBook.Worksheets(1), _ Excel.Worksheet)
excelApp.Visible = True
dim R ,C as integer

r=excelworksheet.usedrange.row().count
c=excelworksheet.usedrange.column().count

excelworksheet.usedrange表示工作表中有数据的范围。。

热点排行