Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Hintergrundfarbe bei Eingabezeile ändern

Gruppe

Change

Problem

Bei Eingaben im Bereich B:2:D10 soll der Hintergrund der Eingabezelle und der Summenzelle in der gleichen Zeile auf rot und die Schrift auf fett gesetzt werden.

Lösung
Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.

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