Set destrange = BaseWks.Range（“B”＆rnum）

我有一段代码，其中包含Set destrange = BaseWks.Range（“B”＆rnum）我不能理解语法.Range（“B”＆rnum）

rnum是在代码中用作计数器的variables。

任何人都可以抛出一些光线，并解释代码中的这一行是什么意思？

Answer 1

BaseWks可能是指一个工作表对象。 BaseWks.Range（“B”＆rnum）引用该工作表上的单个单元格。

所以，假设rnum随着1的每一步增加，并假定循环从rnum = 1开始，那么在循环的第一步中，

destrange = BaseWks.Range("B1") 

在循环的第二步中，

 destrange = BaseWks.Range("B2") 

等等。

Answer 2

Set destrange = BaseWks.Range（“B”＆rnum）

这里的destrange是一个范围对象

BaseWks是工作表对象

和

Range("B" & rnum)是Range("B" & rnum)中Col B中的某个单元格

范围对象可以用许多方式写。 例如，让我们把单元格A1的情况称为Sheet1。 它可以用很多方式书写。

方法1

 Sub Sample() Dim ws As Worksheet Dim rng As Range Set ws = ThisWorkbook.Sheets("Sheet1") Set rng = ws.Range("A1") End Sub 

方式2

 Sub Sample() Dim ws As Worksheet Dim rng As Range Dim i As Long Set ws = ThisWorkbook.Sheets("Sheet1") i = 1 Set rng = ws.Range("A" & i) End Sub 

这种方法通常用于不确定行号或在某个范围内循环的情况。

方式3

 Sub Sample() Dim ws As Worksheet Dim rng As Range Dim i As Long Set ws = ThisWorkbook.Sheets("Sheet1") i = 1 Set rng = ws.Cells(i, 1) End Sub 

.Cells的语法是.Cells(Row, Column)