Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zellfarbe ohne bedingte Formatierung

Zellfarbe ohne bedingte Formatierung
28.05.2006 17:26:31
Peter
Hallo zusammen
wie kann ich eine grosse Tabelle mit Werten sortiert nach Altersangaben farblich unterscheiden. Dabei möchte ich 10 verschiedene Farbecodes einsetzen, immer je eine Farbe für ein Jahrzehnt. Daher geht die bedingte Formatierung nicht (max. 3 Bedingungen). Die Altersangaben stehen in Spalte A. Ich möchte zum Beispiel in Zelle f1 eine "wenn-Bedingung" einsetzen nach dem Motto =wenn in Zelle A1 das Alter zwischen 10 und 19 ist, dann färbe die Zelle f1 rot) usw..
Wer kann mir einen Tipp geben.
Mit bestem Dank im Voraus
Peter
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellfarbe ohne bedingte Formatierung
28.05.2006 17:31:11
Horst
Hi,
das geht nur mit VBA.
mfg Horst
Wenn du Dich auch mit 6 Bedingungen...
28.05.2006 21:39:24
{Boris}
Hi Peter,
...arrangieren könntest, dann kannst du 3 Bedingungen über ein benutzerdefiniertes Zahlenformat und nochmal 3 über die bedingte Formatierung bewerkstelligen (allerdings nur die Schrift- und nicht die Hintergrundfarbe):
Guckst Du: http://www.excelformeln.de/formeln.html?welcher=241
Grüße Boris
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Zellfarbe ohne bedingte Formatierung in Excel


Schritt-für-Schritt-Anleitung

Um die Zellfarbe ohne bedingte Formatierung in Excel zu ändern, kannst du die Funktion „WENN“ in Kombination mit VBA verwenden. Die folgenden Schritte helfen dir dabei:

  1. Öffne Excel und gehe zu dem Arbeitsblatt, das du anpassen möchtest.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Füge ein neues Modul hinzu:

    • Rechtsklicke im Projekt-Explorer auf „VBAProject (DeinArbeitsblattName)“.
    • Wähle „Einfügen“ > „Modul“.
  4. Füge den folgenden VBA-Code ein:

    Sub FärbeZellen()
       Dim Zelle As Range
       For Each Zelle In Range("A1:A100") ' Ändere den Bereich nach Bedarf
           If Zelle.Value >= 10 And Zelle.Value < 20 Then
               Zelle.Offset(0, 5).Interior.Color = RGB(255, 0, 0) ' Rot
           ElseIf Zelle.Value >= 20 And Zelle.Value < 30 Then
               Zelle.Offset(0, 5).Interior.Color = RGB(0, 255, 0) ' Grün
           ' Füge weitere Bedingungen für andere Altersgruppen hinzu
           End If
       Next Zelle
    End Sub
  5. Schließe den VBA-Editor und gehe zurück zu Excel.

  6. Führe das Makro aus:

    • Drücke ALT + F8, wähle „FärbeZellen“ und klicke auf „Ausführen“.

Häufige Fehler und Lösungen

  • Fehler: Makro wird nicht ausgeführt
    Lösung: Stelle sicher, dass die Makros in deinen Excel-Einstellungen aktiviert sind. Gehe zu „Datei“ > „Optionen“ > „Trust Center“ > „Einstellungen für das Trust Center“ und aktiviere „Alle Makros aktivieren“.

  • Fehler: Zellen färben nicht sichtbar
    Lösung: Überprüfe, ob die Zellen im angegebenen Bereich (z. B. A1:A100) tatsächlich Werte enthalten. Wenn die Zellen leer sind, wird keine Färbung angewendet.


Alternative Methoden

Falls du kein VBA verwenden möchtest, kannst du auch die „WENN“-Funktion in Kombination mit einem benutzerdefinierten Zahlenformat nutzen, um den Text oder die Schriftfarbe zu ändern. Hier ist ein Beispiel:

  1. Wähle die Zelle aus und gehe zu „Start“ > „Bedingte Formatierung“ > „Neue Regel“.
  2. Wähle „Formel zur Ermittlung der zu formatierenden Zellen verwenden“.
  3. Gib eine Formel wie =UND(A1>=10, A1<20) ein und wähle die gewünschte Schriftfarbe.
  4. Wiederhole diesen Vorgang für andere Altersgruppen.

Praktische Beispiele

Hier sind einige Beispiele, wie du die „WENN“-Funktion nutzen kannst, um die Zellfarbe ohne bedingte Formatierung zu ändern:

=Wenn(A1<20; "Rot"; Wenn(A1<30; "Grün"; "Blau"))

Das Ergebnis dieser Formel könnte dir helfen, die Zellen entsprechend zu kennzeichnen, auch wenn du keine bedingte Formatierung verwendest.


Tipps für Profis

  • Verwende die „WENN“-Funktion in Kombination mit benutzerdefinierten Zahlenformaten, um die Darstellung deiner Zellen zu verbessern.
  • Experimentiere mit verschiedenen RGB-Werten für individuelle Farben.
  • Bei großen Datenmengen kann die Verwendung von VBA deutlich schneller sein als die manuelle Anwendung von Formeln.

FAQ: Häufige Fragen

1. Kann ich die Zellfarbe auch ohne VBA ändern?
Ja, du kannst die Zellfarbe mit der bedingten Formatierung ändern, jedoch ist die maximale Anzahl an Bedingungen auf drei begrenzt.

2. Wie viele Altersgruppen kann ich mit VBA bearbeiten?
Mit VBA bist du nicht an die Anzahl der Bedingungen gebunden. Du kannst so viele Altersgruppen wie nötig definieren und entsprechend färben.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige