Loop then skip then loop

[Sayf1]

Hey all,

i have ave a simple loop that goes through all colons and rows. I want to to go through 2 rows (1&2) then skip to 11 then run for 4&5 then skip to 7&8 and so one until there is nothing in colomn A. Please help me

Thank you!

 

[Fluff]

Maybe something like

Sub test()
Dim i As Long
For i = 1 To 25 Step 3
   Range("A" & i).Interior.Color = 45678
   Range("A" & i + 1).Interior.Color = 67890
Next i
End Sub