I'm new to this VB programming stuff
OK. So I have one out of three (interior color) working. Can someone tell me why the Bold and Font colors don't change with the code I have???

Thanks for the help !

Private Sub Worksheet_Change(ByVal Target As Range)
Dim icolor As Integer
Dim fcolor As Integer
Dim isbold As Boolean

            If Not Intersect(Target, Range("B2:C2000")) Is Nothing Then
        Select Case Target
            Case "BLACK", "FRED BLACK", "PR.BLACK", "UV BLACK", "UV B,BL"
                icolor = 1
                fcolor = 2
            Case "UV 186", "PMS 187", "PMS 485", "PMS 186 BOA", "PMS 201", "PMS 199", "UV MC RED"
                icolor = 3
                fcolor = 2
                isbold = True
            Case "PMS 321", "UV 335", "UV 390"
                icolor = 10
                isbold = True
            Case Else
                icolor = 2
                fcolor = 1
                isbold = False
        End Select
        Target.Font.Bold = isbold
        Target.Font.Color = fcolor
        Target.Interior.ColorIndex = icolor
    End If

End Sub