在 VBA 中识别 For Each 循环的迭代？

Question

如果我有一个开始的循环：

For each c in Range("A1:C8")

是否有占位符的属性c (c.count, c.value, c.something,...)来标识迄今为止循环迭代的次数？我宁愿使用这样的东西而不是包含另一个变量。

Answer 1

你需要像这样自己数一下

Dim i as integer
i = 0    
For each c in Range("A1:C8")
    i = i + 1

或者

Dim i as integer
Dim c as Range
For i = 0 to Range("A1:C8").Count - 1
    Set c = Range("A1:C8").Cells(i)