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?

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?