is there an easier way?

[greenparrot]

Hi peps

I am writing some code, and i need it too select every other line

like so:

'Range("9:9,11:11,13:13,15:15,17:17,19:19,21:21,23:23")
Selection.Style = "Currency"


this will go on for many many lines, is there an easier way to do this? or am i'm going to have to write in every row?

thanks in advance!

 

[al_b_cnu]

Hi,

how about a loop, e.g.

Dim lRow as Long

For lRow = 9 To ????? Step 2
Range(lRow & ":" & lRow).Style = "Currency"
Next lRow

HTH

Alan