2015-02-23 79 views
0

我在查找通過2列和一行循環的代碼。 異行,J和r - 列如何使用for循環編寫vba中的2列和一行代碼

這裏2和表7列從13基於在2表我想在第一表中選擇單元的值開始直到20和237至244。

。 我想先選擇Cells(i, j).Select和檢查值Cells(i, r).Value並粘貼或Cells(i, j)

For i = 2 to Cells(Rows.Count, "c").End(xlUp).Row 
For j = 13 To 27 
For r = 237 To 244 

評論讓我知道了解決這個。提前致謝。

回答

0

看着你的問題似乎你需要回答"How to refer adjacent cells?"

對於您可以使用偏移()在Excel VBA中財產。

它的工作原理是這樣的: 假設您指的是行號。 1(即i = 1)和j列。 現在你想引用同一行,但列r;你可以使用:

Range("Your_Range").Offset(0, 7).Select 
+0

謝謝@Avidan,我在每個表中有7列。我想遍歷每行的兩個表的所有7列。如果只有一列,我會使用偏移量。 – Prash 2015-02-23 06:38:57

0

我發現了自己的邏輯,感謝所有這些。 這是邏輯:

r = 237 
For i = 10 To Cells(Rows.Count, "c").End(xlUp).Row 
For j = 13 To 20 
If Cells(i, r).Value = "A" Then 
Cells(i, j).Select 
r = r + 1 
Next j 
r = 237 
Next i