对于以下代码,获取对象_worksheet的方法范围失败

时间:2016-12-26 08:42:58

标签: vba excel-vba range excel

我的代码

Set myRange1 = ws1.Range("B5", ws1.Range("B5" & Rows.Count).End(xlUp))

2 个答案:

答案 0 :(得分:1)

如果您尝试从Cell“B5”获取范围,直到最后一行包含B列中的数据(在中间跳过空白单元格),请使用以下代码:

With ws1
    Set myRange1 = .Range("B5:B" & .Cells(.Rows.Count, "B").End(xlUp).Row)
End With

选项2 :如果您尝试从单元格“B5”获取范围,直到列B中的数据的最后一行(不跳过中间的空白单元格),请使用以下可选代码:

With ws1
    Set myRange1 = .Range("B5:B" & .Range("B5").End(xlDown).Row)
End With

答案 1 :(得分:0)

我认为以下部分很奇怪。

ws1.Range("B" & ws1.Rows.Count).End(xlUp).Address

“B5”& Rows.Count不正确。

如果您不使用Rows.Count。 试试这个。

show()