Farben
Excel bietet die Möglichkeit, mit eine Reihe von Farben, die sowohl für die Schrift,
als auch für den Zellhintergrund verwendet werden können, in der Tabelle einzelne Bereiche
hervorzuheben. Wie so oft im Leben, gilt sicher auch hier der Grundsatz: weniger kann mehr sein.
Die verschieden Farben können in der Tabelle direkt ausgewählt werden, können aber
auch über VBA festgelegt werden. Zu diesem Zweck hat jede Farbe eine Nummer. In der ersten Tabelle
habe ich die in der Symbolleiste Formate vorhandenen Farben mit ihren zugehörigen Nummern aufgelistet.
Zum besseren Verständnis sind die Farben in der gleichen Reihenfolge abgebildet.
| 1 |
53 |
52 |
51 |
49 |
11 |
55 |
56 |
| 9 |
46 |
12 |
10 |
14 |
5 |
47 |
16 |
| 3 |
45 |
43 |
50 |
42 |
41 |
13 |
48 |
| 7 |
44 |
6 |
4 |
8 |
33 |
54 |
15 |
| 38 |
40 |
36 |
35 |
34 |
37 |
39 |
2 |
Die Farben in der nächsten Tabelle können nur über VBA aufgerufen werden. Wie man
leicht erkennen kann, kommen einige dieser Farben auch in der oberen Tabelle vor, haben dort aber eine andere
Nummer. Den Grund dafür kenne ich nicht.
| 17 |
18 |
19 |
20 |
21 |
22 |
23 |
24 |
| 25 |
26 |
27 |
28 |
29 |
30 |
31 |
32 |
Grundsätzlich ist es möglich, nach den Farbnummern, per VBA Auswertungen in der Tabelle
vorzunehmen. Allerdings sind hier einige "Tücken" zu beachten:
Schwarzer Text in den Zellen muß nicht die Farbnummer 1 aufweisen. Wenn die Standardeinstellung für die
Textfarbe auf Automatisch gesetzt ist, lautet der Wert - 4105. Der gleiche Wert wird ausgegeben, wenn die
Textfarbe aus einer bedingten Formatierung resultiert. Beim Zellhintergrund ist dieser Wert - 4142.
Wird über bestimmte Zellbereiche eine Formatierung der Schriftfarbe vorgenommen, wird über den
entsprechenden VBA-Befehl auch eine Textfarbe ausgelesen, wenn in den betreffenden Zellen gar kein Text steht.
Somit ist es nicht möglich, auf diesem Weg gefüllte Zellen zu ermitteln.
Hier nun zwei Quelltexte zum Einfügen bzw. Auslesen von Farbformaten:
Zellhintergründe färben:
Nummern der Hintergrundfarben ermitteln:
Beispiel für Schriftformate:
Im Downloadbereich befindet eine Mustertabelle mit den lauffähigen Makros aus den Beispielen..
