2017-05-27 8 views
-3

Mit VBA möchte ich einen bestimmten Bereich wie B7 auswählen: J7, etwas tun (ich habe bereits funktioniert) dann wählen Sie die gleichen Spalten in der nächsten Zeile, B8: J8 und tun die gleiche Operation, dann zyklisch zur nächsten Zeile usw. durch einen festgelegten Bereich von Zeilen. Der komplette Bereich wäre etwa B7: J40. Es scheint einfach, aber ich bin nirgends hingekommen. DankLooping durch einen Bereich Zeile für Zeile

Antwort

1
Dim rowIndex as Long 

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

dies würde Ihnen B7: J7 B8: J8 B9: J9 ... B40: J40

+0

Namenskonventionen müssen programmiererfreundlich sein. Sie scheinen die Zeilen zu durchlaufen, aber mit dem Namen als "col". Ich würde vorschlagen, dass Sie es zu 'row' ändern. –

+0

Ja, Sie sind richtig, da sich col eher auf Zeilen und nicht auf Spalten bezieht, wie durch die verwendete Benennung angedeutet werden könnte – gr8tech

1

Hier ist ein Arbeitskreis/selbsterklärend Beispiel. Ändern Sie es nach Ihren Bedürfnissen.

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 
Verwandte Themen