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

Textfarbe auslesen

Forumthread: Textfarbe auslesen

Textfarbe auslesen
10.07.2003 13:58:09
Bastelino
Hi !
Ich müßte über ein Makro die Textfarbe einer Zelle auslesen. Hab jetzt mal ein bißchen rumprobiert, kam aber zu keinem Ergebnis. Kann mir da bitte jemand helfen ?
Schonmal Danke im Vorraus.
Gruss,
Bastelino
Anzeige

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

Betreff
Datum
Anwender
Anzeige
DANKESCHÖN !
10.07.2003 14:24:21
Bastelino
DANKESCHÖN !!!

AW: Textfarbe auslesen
10.07.2003 14:06:01
Koenig W.
Hallo Bastelino
könnte so laufen

Sub Farbauslesen()
Dim r As Variant
r = Selection.Interior.ColorIndex
MsgBox (r)
End Sub

Das ergibt Dir die Farbnummer der markierten Zelle
Gruss

AW: Textfarbe auslesen
10.07.2003 14:07:34
Koenig W.
Sorry,
gibt natürlich die Zellfarbe und nicht die Textfarbe

Anzeige
AW: Textfarbe auslesen
10.07.2003 14:05:54
OttoH
Hallo BAstelino,
mach mal MsgBox (ActiveCell.Font.ColorIndex)
Gruß OttoH

;
Anzeige

Infobox / Tutorial

Textfarbe in Excel auslesen


Schritt-für-Schritt-Anleitung

Um die Textfarbe einer Zelle in Excel auszulesen, kannst Du VBA (Visual Basic for Applications) verwenden. Hier ist eine einfache Anleitung:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu starten.

  2. Wähle im Menü Einfügen die Option Modul, um ein neues Modul zu erstellen.

  3. Kopiere den folgenden Code in das Modul:

    Sub SchriftfarbeAuslesen()
       Dim farbe As Long
       farbe = ActiveCell.Font.ColorIndex
       MsgBox "Die Schriftfarbe hat den Farbindex: " & farbe
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Wähle die Zelle aus, deren Textfarbe Du auslesen möchtest.

  6. Drücke ALT + F8, wähle SchriftfarbeAuslesen aus der Liste und klicke auf Ausführen.

Jetzt wird Dir ein Fenster angezeigt, das den Farbindex der Schriftfarbe zeigt.


Häufige Fehler und Lösungen

  • Fehler: "Kein Wert angezeigt"
    Lösung: Stelle sicher, dass Du eine Zelle mit Text ausgewählt hast, bevor Du das Makro ausführst.

  • Fehler: "Falsch angegebener Farbindex"
    Lösung: Überprüfe, ob die Schriftfarbe tatsächlich geändert wurde. Der Farbindex könnte von der aktuellen Excel-Version abhängen.


Alternative Methoden

Neben VBA gibt es auch alternative Methoden, um die Schriftfarbe in Excel auszulesen:

  • Bedingte Formatierung: Du kannst Regeln für die Schriftfarbe erstellen und diese dann in Deinen Daten verwenden.
  • Formeln: Direkte Formeln zum Auslesen der Schriftfarbe sind in Excel nicht verfügbar, aber Du kannst VBA nutzen, um diese Automatisierung zu erreichen.

Praktische Beispiele

Hier sind einige praktische Anwendungsbeispiele:

  1. Farben in einer Liste auslesen: Du kannst ein Makro erstellen, das durch eine Liste von Zellen iteriert und die Schriftfarbe jeder Zelle in eine neue Spalte schreibt.

    Sub AlleSchriftfarbenAuslesen()
       Dim i As Integer
       For i = 1 To 10 ' Passe die Zahl an die Anzahl der Zellen an
           Cells(i, 2).Value = Cells(i, 1).Font.ColorIndex ' Schreibt den Farbindex in Spalte B
       Next i
    End Sub
  2. Farbindex in einer Bedingten Formatierung nutzen: Wenn Du spezifische Aktionen basierend auf der Schriftfarbe durchführen möchtest, kannst Du diese Makros verwenden, um diese Logik zu implementieren.


Tipps für Profis

  • Farbpalette anpassen: Du kannst die Farbpalette von Excel anpassen, um spezifische Farben einfacher zu identifizieren.
  • Makros speichern: Speichere Deine VBA-Makros in einer Datei mit der Endung .xlsm, um sie in zukünftigen Projekten wiederzuverwenden.
  • Fehlerbehandlung einbauen: Verwende On Error Resume Next, um Fehler im Code elegant zu handhaben.

FAQ: Häufige Fragen

1. Wie kann ich die Schriftfarbe in Excel ohne VBA ändern?
Du kannst die Schriftfarbe über das Menüband unter Start > Schriftart ändern. VBA ist jedoch erforderlich, um die Schriftfarbe programmgesteuert auszulesen.

2. Was ist der Unterschied zwischen Font.Color und Font.ColorIndex?
Font.Color gibt die RGB-Farbe zurück, während Font.ColorIndex den Farbindex aus der Excel-Farbpalette verwendet.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige