我从workbook1启动以下代码,并希望计算workbook2(wb.Name)中的行数。为什么partII从workbook1返回行数?
Dim partII As String
Workbooks(wb.Name).Activate
Workbooks(wb.Name).Worksheets("sheet1").Select
partII = Range("A" & Rows.Count).End(xlUp).Row
For Each myRecord In Workbooks(wb.Name).Worksheets("sheet1").Range("A1:A" & partII)发布于 2015-08-27 00:37:49
尝试下面的简化代码:
with wb.worksheets("sheet1")
partII = .Range("A" & .Rows.Count).End(xlUp).Row
For Each myRecord In .Range("A1:A" & partII)
'...
Next myRecord
end withhttps://stackoverflow.com/questions/32231968
复制相似问题