VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Hintergrundfarbe bei Null-Bestand ändern.

Gruppe

Feature

Bereich

Bedingt

Thema

Hintergrundfarbe bei Null-Bestand ändern.

Problem

Bei dem Wert "0 Bestand" in Zelle B1 soll die Hintergrundfarbe auf gelb wechseln. Lösung über Menü FORMAT / BEDINGTE FORMATIERUNG

Lösung

Darstellung nur anhand einer Beispielarbeitsmappe möglich.




ClassModule: Tabelle1

Private Sub Worksheet_Change(ByVal Target As Range)
   If Intersect(Target, Range("B2:D10")) Is Nothing Then Exit Sub
   'Wenn die bestehende Markierung nicht aufgehoben werden soll,
   'die beiden folgenden Zeilen auskommentieren
   Range("B2:E10").Interior.ColorIndex = XlColorIndex.xlColorIndexNone
   Range("B2:E10").Font.Bold = False
   Target.Interior.ColorIndex = 3
   Target.Font.Bold = True
   Cells(Target.Row, 5).Interior.ColorIndex = 3
   Cells(Target.Row, 5).Font.Bold = True
End Sub

    


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