With Selection.EntireRow
.FormatConditions.Delete
.FormatConditions.Add Type:=xlExpression, _
Formula1:="=" & ActiveCell.Address(False,
True) & "=""CASH"""
.FormatConditions(1).Font.ColorIndex = 45
End With



--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"shantanu oak" wrote in message
ups.com...
Hi,
I want to highlight the entire row in which the word cash appears.

Shantanu

Bob Phillips wrote:
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual,
_
Formula1:="CASH"
Selection.FormatConditions(1).Font.ColorIndex = 345


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"shantanu oak" wrote in message
ups.com...
I want to select the entire row and change the color of the row where
the word "CASH" is in a single cell.

The following code of the macro is not working.

'
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue,
Operator:=xlEqual, _
Formula1:="=""CASH"""
Rows(FormatConditions(1)).Select
Selection.Font.ColorIndex = 45


Please guide.