質問です。バージョンはexcel2007です。
Dim a As Byte
a = 5
Do Until Cells(a, 5).Value = ""
Cells(a, 3).Interior.ColorIndex = 10
a = a + 1
Loop

cells(a,3)から(a,15)まで同じ処理をしたい場合はどう記述すればいいですか