如何在 VBA 中循環范圍？

Question

我是 VBA 中的新手，我有一個問題，即如何在 VBA 中循環范圍，例如： Range("A1:D1").select到Range("A100:D100").select

或者

Range("A1:D1").select到Range("D1:G1").select ?

Answer 1

注意：最好避免使用Select 、 Activate等...

要遍歷每行更改的范圍，請使用For循環lRow下面的lRow ：

' loop example per your case
For lRow = 1 To 100
    Range("A" & lRow & ":D" & lRow).Select
Next lRow

要循環遍歷每列更改的范圍，請使用For循環遍歷下面的Col ：

' loop example per your case
For Col = 1 To 4
    Range(Cells(1, Col), Cells(1, Col + 3)).Select
Next Col