Alle Zellen mit gleicher Schriftfarbe addieren

Dieses Beispiel soll demonstrieren, wie Sie mit speziell formatierte Zellen Rechenoperationen durchführen lassen können. 
Excel kann Standardmäßig Formatierungen wie Schriftfarbe, Hintergrundfarbe, Unterstreichungen etc. nicht in die Formelberechnung mit einbeziehen. Es macht aber hin und wieder absolut Sinn diese weitere Dimension im Kalkulationsmodell zu verwenden.

Im folgendenBeispiel werden alle rot formatierten Zellen addiert:

Function Farbsumme(Bereich As Range)
 Application.Volatile
 Farbsumme = 0
 For Each zelle In Bereich
 If zelle.Font.ColorIndex = 3 Then
 Farbsumme = Farbsumme + zelle.Value
 End If
 Next
 End Function


Die Farben der Standard Farbpalette haben folgende Index-Nummern.

Wenn Sie die Idee gut  finden und Ihr Excel um neue Summierungsformern erweitern möchten, dann sehen Sie sich unser Summierungs-Tools etwas näher an.

Partnerlinks

Relevante Artikel

Wir benutzen Cookies
Ihre Zufriedenheit ist unser Ziel, deshalb verwenden wir Cookies. Mit diesen ermöglichen wir, dass unsere Webseite zuverlässig und sicher läuft, wir die Performance im Blick behalten und Sie besser ansprechen können. Cookies werden benötigt, damit technisch alles funktioniert und Sie auch externe Inhalte lesen können. Des Weiteren sammeln wir unter anderem Daten über aufgerufene Seiten, getätigte Käufe oder geklickte Buttons, um so unser Angebot an Sie zu Verbessern. Mehr über unsere verwendeten Dienste erfahren Sie unter „Weitere Informationen“. Mit Klick auf „Akzeptieren“ erklären Sie sich mit der Verwendung dieser Dienste einverstanden. Ihre Einwilligung können Sie jederzeit mit Wirkung auf die Zukunft widerrufen oder ändern.