Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Final Macro:
Sub BlueRows() With Selection .FormatConditions.Delete If Selection.Cells(1, 1).Row Mod 2 = 0 Then .FormatConditions.Add Type:=xlExpression, Formula1:= _ "=MOD(ROW(),2)0" Else .FormatConditions.Add Type:=xlExpression, Formula1:= _ "=MOD(ROW(),2)=0" End If .FormatConditions(1).Interior.ColorIndex = 34 .Interior.ColorIndex = 2 End With End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Conditional Formatting on cells beginning with a hyphen | Excel Discussion (Misc queries) | |||
Conditional Formatting to Check for Blanks | Excel Worksheet Functions | |||
how to check for ANY text when conditional formatting? | Excel Discussion (Misc queries) | |||
Check box & conditional formatting | Excel Discussion (Misc queries) | |||
Check Boxes and Conditional Formatting | Excel Programming |