Conditional formatting

Det kan man ikke, men man kan lave en stykke VBA kode, som kan ordne dette problem.

kan du hjælpe med dette

Ja da :-) her noget eksempel kode, som skal placeres i arkets eget kodemodul

Private Sub Worksheet_Change(ByVal Target As Range)

    If Not Intersect(Target, Range("A1")) Is Nothing Then
        With Target
            Select Case .Value
                Case 0 To 9
                    .Interior.ColorIndex = 3
                Case 10 To 19
                    .Interior.ColorIndex = 8
                Case 20 To 29
                    .Interior.ColorIndex = 5
                Case Else
                    .Interior.ColorIndex = xlNone
            End Select
        End With
    End If

End Sub

Hvad vil du have evalueret og hvordan skal det formateres og hvilke celle drejer det sig om ?

Baggrunden i cennel skal skifte farve
Jeg oprette en range hvor i den skal søge skal vi kalde rangen for personer.
Værdigerne er som jkmi + ames + thoc mm

Private Sub Worksheet_Change(ByVal Target As Range)

    If Not Intersect(Target, Range("Personer")) Is Nothing Then
        With Target
            Select Case UCase(.Value)
                Case "JKMI"
                    .Interior.ColorIndex = 3
                Case "AMES"
                    .Interior.ColorIndex = 8
                Case "THOC"
                    .Interior.ColorIndex = 5
                Case Else
                    .Interior.ColorIndex = xlNone
            End Select
        End With
    End If

End Sub

Perfekt TAK......

ingen årsag :-)