I'd like a macro that I can change the background color from column A thru I based on a word from a drop down menu in column G. I would do conditional formatting but I have more then 3 words. I would like different colors for each word and have the macro do it automatically.
I found this code but it only colors the cell in column G and not columns A thru I...... any help modifiying it would help too....
Private Sub Worksheet_Change(ByVal Target As Range)
Dim icolor As Integer
If Target.Column <> 7 Then Exit Sub
'change the conditions below
Select Case Target.Value
Case "Cmpl"
Case "In Progress"
icolor = 6
Case 1 To 9
icolor = 45
Case 1 To 9
icolor = 3
Case Else
'Whatever
End Select
Target.Interior.ColorIndex = icolor
End Sub
Thanks!!
Bookmarks