View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
FSt1 FSt1 is offline
external usenet poster
 
Posts: 3,942
Default Formula to select every third cell in a very long column of data?

hi,
formulas return values from other cells but they cannot perform actions like
select another cell.
Multiple selects are possible but you can run into problems depending with
what you wish to do.
this macro will highlight every third cell
edit to fit your data.
Sub everythird()
Dim r As Range
Dim rd As Range
Set r = Range("A2")
Do While Not IsEmpty(r)
Set rd = r.Offset(3, 0)
r.Interior.ColorIndex = 40
Set r = rd
Loop
End Sub

regards
FSt1

"jme951" wrote:

Is there a formula or an easy way to select/highlight every third cell in a
very long column of data?
--
Thanks,
Jamie