循環遍歷逐行的範圍

Question

使用VBA我想選擇一個特定的範圍，例如B7：J7，做一些事情（我已經有這個工作），然後在下一行中選擇相同的列，B8：J8並且執行相同的操作，然後通過設置的行範圍循環到下一行等。完整的範圍將是像B7：J40。這似乎很容易，但我沒有得到任何地方。由於

Answer 1

Dim rowIndex as Long 

for rowIndex = 7 to 40 
    Sheet1.Range("B" & rowIndex & ":J" & rowIndex) 
next col 

這將給你 B7：J7 B8：J8 B9：J9 ... B40：J40

Answer 2

這裏是一個工作代碼/言自明的例子。根據您的需求修改它。

Sub loops() 
Dim rownum As Long 
'looping rows 7 to 40 
For rownum = 7 To 40 
    'Assuming you want to sum the range and put the output in K7, K8, K9 and so on... 
    Range("K" & rownum) = WorksheetFunction.sum(Range("B" & rownum & ":j" & rownum)) 
Next rownum 
End Sub