Advanced Conditional Formating
Place this in the sheet module and change "A:A" to the column with your pull
downs. Then modify the ColorIndex, Pattern, and PatterColorIndex as desired.
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A:A")) Is Nothing Then
With Target.EntireRow.Interior
.ColorIndex = 3
.Pattern = xlGray16
.PatternColorIndex = 2
End With
End If
End Sub
Mike
"Adam@MGI" wrote:
I am using a spreadsheet for job tracking. Each row contains the details for
1 specific job. I have a pull down list set-up in one cell on each row that
has the different options for the job's status.
I would like to have a pattern applied to the entire row depending on the
option selected in the pull down.
Is this possible and how do I do it?
|