Zellen in einem Arbeitsblatt können Werte oder Formeln enthalten. Zu einem bestimmten Zeitpunkt möchten Sie möglicherweise alle Zellen in Ihrem Arbeitsblatt, die Formeln enthalten, durch Färben dieser Zellen hervorheben. Es gibt verschiedene Möglichkeiten, wie Sie dieses Problem angehen und lösen können. Wenn Sie die Hervorhebung nicht so oft durchführen müssen, ist ein manueller Ansatz möglicherweise am besten.

Befolgen Sie diese Schritte:

  1. Drücken Sie entweder F5 oder Strg + G. Excel zeigt das Dialogfeld Gehe zu an.

  2. Klicken Sie auf Spezial. Excel zeigt das Dialogfeld Gehe zu Spezial an. (Siehe Abbildung 1.)

  3. Aktivieren Sie das Optionsfeld Formeln.

  4. OK klicken.

Zu diesem Zeitpunkt wird jede Zelle im Arbeitsblatt ausgewählt, die Formeln enthält, und Sie können diesen Zellen Farbe hinzufügen oder sie nach Bedarf formatieren. Dieser Ansatz kann bei Bedarf mithilfe eines Makros wie dem folgenden automatisiert werden:

Sub ColorFormulas()

ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas, 23).Select     With Selection.Interior         .ColorIndex = 6         .Pattern = xlSolid     End With End Sub

Sie können dieses Makro so oft wie nötig ausführen, um die verschiedenen Zellen hervorzuheben, die Formeln enthalten. Das einzige Problem besteht darin, dass die Hervorhebung erhalten bleibt, wenn eine Formel aus einer zuvor hervorgehobenen Zelle gelöscht wird. es wird nicht automatisch entfernt. In diesem Fall ist ein anderer Makroansatz vorgeschrieben. Dieses Makro wirkt auf einen Bereich von Zellen, die Sie auswählen, bevor Sie das Makro ausführen.

Sub ColorFunction()

For Each cell In Selection         If cell.HasFormula Then             With cell.Interior                 .ColorIndex = 6                 .Pattern = xlSolid             End With         Else             cell.Interior.ColorIndex = xlNone         End If     Next cell End Sub

Das Makro überprüft jede Zelle im Bereich. Wenn die Zelle eine Formel enthält, wird diese hervorgehoben. Wenn die Zelle keine Formel enthält, ist die Hervorhebung deaktiviert.

Eine weitere mögliche Lösung besteht darin, eine benutzerdefinierte Funktion zusammen mit den Funktionen zur bedingten Formatierung von Excel zu verwenden. Erstellen Sie im VBA-Editor die folgende Funktion:

Function CellHasFormula(c As Range) As Boolean     CellHasFormula = c.HasFormula End Function

Mit dieser Funktion können Sie die bedingten Formatierungsfunktionen von Excel (an anderer Stelle in ExcelTips beschrieben) verwenden, um zu überprüfen, was die Formel zurückgibt. Mit anderen Worten, Sie würden ein bedingtes Format festlegen, das das Ergebnis dieser Formel überprüft:

=CellHasFormula(A1)

Wenn das Ergebnis wahr ist (die Zelle enthält eine Formel), wird Ihr bedingtes Format angewendet.

Es ist interessant festzustellen, dass Sie kein VBA-Makro erstellen müssen, um die Route der bedingten Formatierung zu verwenden, wenn Sie dies nicht möchten. (Einige Leute haben eine natürliche Abneigung gegen die Verwendung von Makros.) Stattdessen können Sie die folgenden Schritte ausführen:

  1. Drücken Sie Strg + F3. Excel zeigt das Dialogfeld Name definieren an.

  2. Geben Sie im Feld Namen (oben im Dialogfeld) einen Namen wie FormulaInCell ein.

  3. Geben Sie im Feld Verweise auf (am unteren Rand des Dialogfelds) Folgendes ein:

  4. OK klicken.

Jetzt können Sie die zuvor beschriebenen Techniken zum Einrichten der bedingten Formatierung befolgen. Der einzige Unterschied besteht darin, dass das bedingte Format stattdessen nach der folgenden Formel suchen sollte:

=FormulaInCell

_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 (2766) gilt für Microsoft Excel 97, 2000, 2002 und 2003.