Dear Experts:

I would like to apply the below formatting to named ranges in the active worksheet in just one macro.

The named ranges have the following make-up:

prod_range_01, prod_range_02, prod_range_03, prod_range_04, till prod_range_80.

Help is very much appreciated. Thank you very much in advance.

Sub Format_Selection

For Each cell In Selection

If cell.Row Mod 2 = 1 Then ''highlights row 2,4,6 etc|= 0 highlights 1,3,5

cell.Interior.Color = RGB(255, 255, 255)

Else

cell.Interior.Color = RGB(197, 217, 241)

End If

Next cell

End Sub