选择没有标题的动态范围

时间:2014-07-31 19:00:15

标签: excel-vba vba excel

如果B列中存在数据,我想选择A2:BG2范围内的所有行。第2行是标题。

几乎有效:

Set rng = Range("A2:BG2").Resize(Cells(Rows.Count, "B").End(xlUp).Row)
rng.Select

但它在选择中包括最后一行后面的空行和B中的数据。例如,我在B2中有数据:B6但是这会选择行2-7。偏移似乎只是改变整个动态范围。我错过了什么?

1 个答案:

答案 0 :(得分:0)

问题在于您的

Cells(Rows.Count, "B").End(xlUp).Row

在哪里计算来自A1(第1行)的已使用行,但您的范围是从A2(第2行)开始 所以它会在底部添加额外的空白行。因此,摆脱只是减去你不必要的行数。

Cells(Rows.Count, "B").End(xlUp).Row

最终守则将

Set rng = Range("A2:BG2").Resize(Cells(Rows.Count, "B").End(xlUp).Row - 1)
rng.Select

希望这有助于你的谜题。

相关问题