Jozef sucht nach einer Möglichkeit, die Hintergrundfarben bestimmter Zellen in dem von ihm erstellten Arbeitsblatt zu ändern. Zum Beispiel möchte er alle roten Hintergrundzellen finden und in blau ändern oder alle gelben Hintergründe finden und in blau ändern. Jozef fragt sich, ob es dafür einen einfachen Weg gibt.

Es ist ziemlich offensichtlich, dass Sie die Hintergrundfarben aller Zellen manuell ändern können, sodass Sie diese Option nicht verwenden müssen, um die Änderungen vorzunehmen. Sie müssen lediglich ein einfaches Werkzeug wie das Werkzeug Suchen und Ersetzen verwenden, um die Farbänderungen vorzunehmen. Befolgen Sie diese Schritte:

  1. Drücken Sie Strg + H, um die Registerkarte Ersetzen des Dialogfelds Suchen und Ersetzen anzuzeigen.

  2. Erweitern Sie das Dialogfeld, indem Sie auf die Schaltfläche Optionen klicken. (Siehe Abbildung 1.)

  3. Klicken Sie auf die Schaltfläche Format rechts neben dem Feld Suchen nach. Excel zeigt das Dialogfeld Format suchen an.

  4. Stellen Sie sicher, dass die Registerkarte Füllen ausgewählt ist. (Siehe Abbildung 2.)

  5. Verwenden Sie die Steuerelemente im Dialogfeld, um die Hintergrundfarbe anzugeben, die Sie ersetzen möchten.

  6. OK klicken.

  7. Klicken Sie auf die Schaltfläche Format auf der rechten Seite des Felds Ersetzen durch.

Excel zeigt das Dialogfeld Format ersetzen an.

  1. Stellen Sie sicher, dass die Registerkarte Füllen ausgewählt ist.

  2. Verwenden Sie die Steuerelemente im Dialogfeld, um die Hintergrundfarbe anzugeben, die Sie beim Ändern der Zellen verwendet haben.

  3. OK klicken.

  4. Klicken Sie auf Alle ersetzen.

Wenn Sie feststellen, dass Sie immer wieder dieselben Farbänderungen vornehmen müssen (z. B. immer von Rot nach Blau), möchten Sie möglicherweise ein Makro verwenden, um die Änderungen vorzunehmen. Das folgende Beispiel kann einer Tastenkombination zugewiesen oder der Symbolleiste für den Schnellzugriff hinzugefügt werden, damit Sie es schnell verwenden können:

Sub ChangeColor()

Dim rCell As Range     If Selection.Cells.Count = 1 Then         MsgBox "Select the range to be processed."

Exit Sub     End If     For Each rCell In Selection         If rCell.Interior.Color = RGB(255, 0, 0) Then  'red             rCell.Interior.Color = RGB(0, 0, 255)      'blue         End If     Next rCell End Sub

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (9043) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365. Eine Version dieses Tipps für die ältere Menüoberfläche von Excel finden Sie hier:

Ersetzen von Hintergrundfarben in Zellen.