读书人

在工作表数量不确定的工作簿中读取数据

发布时间: 2012-03-03 15:33:02 作者: rapoo

在工作表数量不确定的工作簿中读取数据
一个工作簿中,工作表数量不确定,工作表名称不确定,工作表列数一定,行数不一定,读取指定列的数据,请问如何操作?谢谢大家,如果有合适的答案回追加得分

[解决办法]
看看有用没。
Dim obj As Excel.Application
Dim objWorkbook As Workbook
Dim objWorksheet As Worksheet
Dim idx As Long
Dim ldx As Long
Set objWorkbook = obj.Workbooks.Open(file)

For Each objWorksheet In objWorkbook.Worksheets
For idx = 1 To objWorksheet.Rows
For ldx = 1 To objWorksheet.Columns
If objWorksheet.Cells(idx, ldx) = xxx Then

End If
Next
Next
Next

读书人网 >VB

热点推荐