Gruppen

Top Gruppen: Windows 7; Windows Vista; Windows XP; Textverarbeitung; Excel; DSL; Internet Browser; E-Mail/Outlook
Betriebsysteme: Windows classik; Linux; BS-Sonstige
Software: Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; SW-Sonstige
Hardware: Mainboard/CPU; Grafikkarten; Peripherie; Laptop/Notebook; HW-Sonstiges
Netzwerk: Telefon,ISDN,Modem; W-Lan; NW-Sonstiges
Programmierung: PHP,ASP,Perl...; Java,C++...; Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke; SN Intern; Test

/ Forum / Tabellenkalkulation

Tabellenkalkulation

Fragevon Yuelle vom 13.12.2019, 11:43 Options

Übersicht der Schriftfarben in Textform in Excel 2003

Hallo!

Ich suche eine Übersicht der Schriftfarben, die ich bei der benutzerdefinierten Zellformatierung ([Rot]#.##0,00 €;[Grün]-#.##0,00 €) benutzen kann. Wenn ich grün nehme, dann erscheint jedoch "Grelles Grün" laut Farbübersicht von Excel, was schlichtweg nicht lesbar ist. Andere Grüns wie z. B. "Dunkelgrün" werden nicht akzeptiert.

MfG Jürgen

Excel 2003 unter Windows XP mit SP2

Antwort schreiben

Antwort 1 von Marie vom 13.12.2019, 12:40 Options

nicht für alle 56 verfügbaren Farben gibt es für sich
sprechende Konstanten. Die verfügbaren Konstanten:
Schwarz 0 vbBlack
Blau 5 vbBlue
Cyan 8 vbCyan
Grün 4 vbGreen
Magenta 7 vbMagenta
Rot 3 vbRed
Weiß 2 vbWhite
Gelb 6 vbYellow

Eine Farbtabelle erstellen:

'===================================================================
' Auf CD Buchdaten\Beispiele\01_Einstieg\
' Dateiname 01_04_Colors.xls
' Tabelle Index
' Modul mdl_01_AllColors
'===================================================================
Sub AllColors()
Dim i As Integer
For i = 1 To 14
' Farbindex: 1-14
Cells(1, i).Value = i
Cells(2, i).Interior.ColorIndex = i
' Farbindex: 15-28
Cells(4, i).Value = i + 14
Cells(5, i).Interior.ColorIndex = i + 14
' Farbindex: 29-42
Cells(7, i).Value = i + 28
Cells(8, i).Interior.ColorIndex = i + 28
' Farbindex: 43-56
Cells(10, i).Value = i + 42
Cells(11, i).Interior.ColorIndex = i + 42
Next i
' Spaltenbreite verkleinern auf 2 Pixel
Columns("A:N").ColumnWidth = 2
End Sub

Zitat aus dem Excel-VBA Codebook Seite 44.

Gruß Marie

Antwort 2 von meinTipp vom 13.12.2019, 12:40 Options

Hallo Jürgen,
Schwarz, Blau, Zyan, Magenta, Grün, Rot, Weiß, Gelb denke ich.
Mit[Farbe n] für n von 0 bis 56 wählst du eine Farbe aus deiner Farbpalette.

Gruss Rolf

Antwort 3 von Yuelle vom 13.12.2019, 14:34 Options

Hallo Marie und Rolf,

vielen Dank für eure Antworten.

Rolf, mit deinem Hinweis "Farbe n" kann ich nichts anfangen. In der benutzerdefinierten Zellformatierung kann ich dies jedenfalls nicht als Ersatz für den Farbnamen nutzen. Was meinst du damit?

Eine Lösung für mein Problem habe ich nun in der bedingten Formatierung gefunden, da ich dort bei der Schriftfarbe direkt auf die Farbpalette zugreifen kann.

MfG Jürgen

Antwort 4 von meinTipp vom 13.12.2019, 14:59 Options

Formatiere mal eine Zelle die eine Zahl enthält mit dem benutzerdefinierten Format
[Farbe5] 0,00
Schau dir die Zahl an. Sie sollte Blau sein.
Ändere die 5 in eine andere Zahl zwischen 0 und 56.

Ich hoffe jetzt ist es klar.

Antwort 5 von Yuelle vom 13.12.2019, 15:05 Options

Ah jetzt ja ;-)

Ich hatte - entsprechend deiner ersten Antwort - "Farbe" und "n" getrennt geschrieben, daher die Fehlermeldung. Vielen Dank!

MfG Jürgen

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Tipp einschicken

News einschicken