Hello
I am having problems with some conditional formatting code, can anyone help me. I basically have a piece of code which adds subtotals and totals to an excel file. I have some coding to colour the subtotal and total rows, but its does not seem to work. can anyone help me with it.
thanks
dharmesh
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=IF(ISERROR(SEARCH(""Total"";$B1));"""";1)"
With Selection.FormatConditions(1).Font
.Bold = True
.Italic = False
End With
Selection.FormatConditions(1).Interior.ColorIndex = 6
I am having problems with some conditional formatting code, can anyone help me. I basically have a piece of code which adds subtotals and totals to an excel file. I have some coding to colour the subtotal and total rows, but its does not seem to work. can anyone help me with it.
thanks
dharmesh
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=IF(ISERROR(SEARCH(""Total"";$B1));"""";1)"
With Selection.FormatConditions(1).Font
.Bold = True
.Italic = False
End With
Selection.FormatConditions(1).Interior.ColorIndex = 6