Ich versuche eine Bedingte markierung vorzunehmen. Für Auto, mortgage und die Werte rot zu markieren kriege ich noch hin. Aber für die markierung für "preferred" und "non-preferred" in der selben Gruppe weiss ich nicht ganz, wie ich das programmieren kann. Jede Hilfe ist willkommen. Danke Euch

hier ein Bildchen:

https://i.stack.imgur.com/l03W6.jpg

Sub Schaltfläche2_Klicken()
 Dim cell As Range

 For Each cell In ws.Range("A1:A100")
     If cell.Value = "Auto" Then
     cell.Interior.Color = XlRgbColor.rgbRed

     ElseIf cell.Value = "Mutti" Then
     cell.Interior.Color = XlRgbColor.rgbRed
    End If
Next
End Sub