关于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表示工作表中有数据的范围。。