Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.10.2025 21:57:06
Diagrammpunkte in unterschiedlichen Farben je nach Wert
19.10.2025 18:21:56
Prüfen, ob Bild geladen wurde
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
19.10.2025 10:48:58
Zufällige Uhrzeit
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
188to192
188to192
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Per Commandbutton eine Zelle mit Farbe füllen

Forumthread: Per Commandbutton eine Zelle mit Farbe füllen

Per Commandbutton eine Zelle mit Farbe füllen
05.12.2002 11:48:37
Sascha
Salü Miteinander!

Ist es möglich, durch einen Klick auf einen CommandButton die momentan gewählte Zelle mit einer definierten Farbe zu füllen?

Ich habe eine LIste mit einer Spalte 'Status'.. auf jeder Zeile wird dann in die Zelle der Spalte geklickt und man sollte verschiedene Buttons betätigen können, die die zelle mit der definierten Farbe für Pendent, Bestellt etc. füllt..!

Geht das?

Gruss

Sascha

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Makro
05.12.2002 11:59:31
Nico D
Hallo Sascha,

With Selection
.Value = ""
End With

Selection.Interior.Colorindex = 3

Hier wird die selektierte mit der Farbe Rot (3) gefüllt.

Grüße Nico

Re: Makro
05.12.2002 12:02:48
Sascha
Salü Nico!

Besten Dank!

Aber wo trage ich das alles ein? Kann man zusätzlich einen Test reinschreiben lassen?

Danke!

Sascha

Anzeige
Text hab ich, aber Farben mischen?!?
05.12.2002 12:28:39
Sascha
Salü Nico, das mit dem Text hab ich herausgefunden!

Ist es aber nicht möglich, die Zielfarbe in Hex anzugeben, so wie ich das beim Commandbutton mache? Ich möchte eben, dass die Zelle dann die gleiche Farbe hat, also zbs. &H00FF80FF& .. ?

Danke für deine Hilfe!

Sascha

Re: Per Commandbutton eine Zelle mit Farbe füllen
05.12.2002 13:30:24
Sascha
Also das mit dem Text läuft, jedoch wie beschrieben mit dem Farben in Hex Werten (So wie ich die Buttonfarbe ändere) müsste ich noch haben UND:

- Wenn ich das Blatt schütze, kann er die entsprechende Farbe nicht mehr in die Zelle füllen, weil dann die Fülleffekte gesperrt sind durch den Blattschutz... wie kann ich das umgehen?

Sascha

Anzeige
Re: Text hab ich, aber Farben mischen?!?
05.12.2002 13:46:42
Nico D
Hallo Sascha,

die Steuerung über die BackColor der Userform etc. (z.B.&H8000000F&) ist mir nicht bekannt. Aber Du kannst doch eine Art Wenn - Funktion auf den Button legen.

z.B. (so aus dem Bauch heraus)
~
Private Sub CommandButton1_Click()
If Commandbutton1.Backcolor = .&H8000000F& then
With Selection
.Value = "TEST"
End With
Selection.Interior.Colorindex = 2
End If
Unload me ' falls Userform
End Sub
~

Grüße Nico



Anzeige
;
Anzeige

Infobox / Tutorial

Mit CommandButton eine Zelle in Excel farbig füllen

Schritt-für-Schritt-Anleitung

  1. Öffne Excel und erstelle ein neues Arbeitsblatt oder öffne ein bestehendes.

  2. Aktiviere die Entwicklertools: Gehe zu "Datei" > "Optionen" > "Menüband anpassen" und aktiviere das Kontrollkästchen für die Entwicklertools.

  3. Füge einen CommandButton hinzu: Klicke auf "Entwicklertools" > "Einfügen" > "Button" und ziehe ihn auf das Arbeitsblatt.

  4. Doppelklicke auf den Button, um das VBA-Editorfenster zu öffnen.

  5. Füge den folgenden Code ein, um die aktuell ausgewählte Zelle mit einer Farbe zu füllen:

    Private Sub CommandButton1_Click()
   With Selection
       .Value = "TEST" ' Hier kannst du den gewünschten Text eingeben
       .Interior.ColorIndex = 3 ' Füllt die Zelle mit Rot
   End With
End Sub

  6. Schließe den VBA-Editor und teste den Button, indem du ihn klickst.

Häufige Fehler und Lösungen

  • Fehler: Zelle wird nicht gefüllt, wenn das Blatt geschützt ist.

    • Lösung: Du kannst den Blattschutz vorübergehend aufheben, indem du im VBA-Code den Schutz entfernst und nach dem Füllen der Zelle wieder aktivierst:
    Private Sub CommandButton1_Click()
   ActiveSheet.Unprotect "deinPasswort" ' Blatt ungeschützt
   With Selection
       .Value = "TEST"
       .Interior.ColorIndex = 3
   End With
   ActiveSheet.Protect "deinPasswort" ' Blatt geschützt
End Sub

  • Fehler: Die gewählte Farbe wird nicht angezeigt.

    • Lösung: Stelle sicher, dass die richtige ColorIndex-Nummer verwendet wird. Du kannst die Farbcodes in der Excel-Dokumentation nachschlagen.

Alternative Methoden

  • Verwendung von Hex-Farben: Um Farben in Hex anzugeben (z.B. &H00FF80FF&), kannst du die RGB-Funktion nutzen:

    Private Sub CommandButton1_Click()
   With Selection
       .Value = "TEST"
       .Interior.Color = RGB(0, 255, 128) ' Beispiel für eine grüne Farbe
   End With
End Sub

  • Excel Shortcut Farbe füllen: Du kannst auch die Excel-Shortcuts verwenden, um schnell die Füllfarbe einer Zelle zu ändern. Wähle eine Zelle aus und benutze Alt + H, gefolgt von H, um die Füllfarbe anzupassen.

Praktische Beispiele

  • Beispiel 1: Fülle die Zelle mit einer anderen Farbe:

    Private Sub CommandButton2_Click()
   With Selection
       .Value = "Bestellt"
       .Interior.ColorIndex = 4 ' Füllt die Zelle mit Grün
   End With
End Sub

  • Beispiel 2: Verwende verschiedene CommandButtons für unterschiedliche Status:

    Private Sub CommandButton3_Click()
   With Selection
       .Value = "Pendent"
       .Interior.ColorIndex = 6 ' Füllt die Zelle mit Gelb
   End With
End Sub

Tipps für Profis

  • Farben dynamisch anpassen: Du kannst die ColorIndex-Werte in einer Dropdown-Liste speichern, um die Farbe dynamisch auszuwählen, basierend auf Benutzeranfragen.
  • Benutzerdefinierte Formate: Nutze die Formatierungsoptionen in Excel, um die Darstellung deiner Zellen weiter anzupassen.
  • Erstelle eine Benutzeroberfläche: Verwende UserForms, um eine interaktive Oberfläche zu schaffen, die es den Benutzern ermöglicht, Farben und Texte einfacher auszuwählen.

FAQ: Häufige Fragen

1. Frage Kann ich mehrere Zellen gleichzeitig mit einem Button färben?

Antwort: Ja, du kannst die Selection auf eine Gruppe von Zellen anwenden. Stelle sicher, dass du die Zellen vorher auswählst.

2. Frage Wie kann ich die Farbe in einer bestimmten Excel-Version ändern?

Antwort: Die oben genannten Methoden funktionieren in Excel 2010 und neuer. Bei älteren Versionen kann es Unterschiede in der Benutzeroberfläche geben, aber die VBA-Codes bleiben gleich.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige