VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Farbanpassung nach Eingabewert

Gruppe

Feature

Bereich

Bedingt

Thema

Farbanpassung nach Eingabewert

Problem

Wie kann ich in Abhängigkeit von Eintragungen in Spalte A in Spalte B die Schriftfarbe verändern?

Lösung

Formel für die bedingte Formatierung: =A1="Lieferant A"




ClassModule: Tabelle1

Private Sub Worksheet_Change(ByVal Target As Range)
   With Range("B1")
      If .Value = True Then
         .Interior.ColorIndex = 34
      Else
         .Interior.ColorIndex = 36
      End If
   End With
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Feature und Bedingt