Thread: Color every 'nth' row?
View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Rick[_22_] Rick[_22_] is offline
external usenet poster
  
Posts: 2
Default Color every 'nth' row?

Sub Color_Rows()
Dim RowNum As Integer
RowNum = InputBox("Ever what row would you like
colored ???")
For I = 0 To 100 Step RowNum
With ActiveSheet
..Range("A1:IV1").Offset(I, 0).Interior.ColorIndex = 8
End With
Next I
End Sub

Reply With QuoteReply With Quote