Schriftfarbe ändern

24/01/2008 - 21:17 von matze_matz | Report spam
Hallo,

ich möchte in einem Tabellenblatt in Excel das schon Text enthàlt meine
neuen Eintragungen in anderer Schriftfarbe eingeben.
Ich möchte nicht jede einzelne Zelle dazu über Format... entsprechend die
Farbe zuweisen sondern der Text sollte die Farbe dauernd beibehalten wobei
der alte Text in der bisherigen Farbe verbleibt. Sollte ich ein drittes mal
das Tabellenblatt bearbeiten möchte ich dies wieder in einer anderen Farbe
tun und so weiter und so weiter.

Hat jemand dafür eine Lösung? Ich habe versucht über Googeln eine Lösung zu
finden aber ohne Erfolg.

Vielen Dank für Eure Antworten die mir weiterhelfen.
 

Lesen sie die antworten

#1 Peter Schleif
24/01/2008 - 21:46 | Warnen spam

ich möchte in einem Tabellenblatt in Excel das schon Text enthàlt meine
neuen Eintragungen in anderer Schriftfarbe eingeben.

Sollte ich ein drittes mal
das Tabellenblatt bearbeiten möchte ich dies wieder in einer anderen Farbe
tun und so weiter und so weiter.



Es ist wohl schwierig für Excel zu erkennen, was Du als 3.Mal und was
als 4.Mal oder 5.Mal bezeichnest.

Reicht es, wenn tàglich die Farbe geàndert wird?

Peter


Private Sub Worksheet_Change(ByVal Target As Range)

Dim color_mapping As Variant

'Eine Liste angenehmer Color-Indizees
'Bei Bedarf aendern oder erweitern
color_mapping = Array(3, 4, 5, 7, 8, 10, 22)

Target.Font.ColorIndex = _
color_mapping(Day(Now) Mod (UBound(color_mapping) + 1))

End Sub

Ähnliche fragen