宏Visual Basic如何总和到这样的选定范围区域设置rango =范围（＆＃34; A7：A7 + 8＆＃34;）

Question

Dim rango As Range，celda As Range

设置rango =范围（＆＃34; A7：A7 + 8＆＃34;）

Answer 1

也许。像这样重复，

Set rango = Range("A7").Resize(8, 1)

从你的叙述中真正不清楚哪个方向可以扩展到8个人。以上将A7扩展为A7：A14（共8行）。

Answer 2

有几种方法。它是一样的。

Set rango = Range("A7:A" & 7 + 8)
Set rango = Range("A7", "A" & 7 + 8)
Set rango = Range("A7").Resize(9)