将单元格加载到变体后，如何获取其地址？

Question

我将一系列细胞加载到变体中，以便尽快循环细胞。

但是，当一个单元格有一定值时，我想用偏移方法在单元格旁边的字段中写入内容。

我可以这样做吗？有没有办法在我的变种数组中访问我的单元格的地址属性？

Answer 1

我猜你想沿着这些方向做点什么：

Sub varOutput()

Dim v As Variant
Dim i As Long

v = Sheet1.Range("A1:B3")
For i = 1 To 3
    If v(i, 1) = "a" Then v(i, 2) = "y"
Next i
Sheet1.Range("A1:B3") = v

End Sub

将范围写入变量会在内存中创建一个值数组，因此您无法使用Offset，因为它所指的工作表上没有地址。上面的代码所做的是将要检查的范围和要输出的范围写入二维数组，并将任何输出值写入数组。一旦完成，它将整个阵列输出回相同的范围。