Schriftfarbe einer Zelle

Forumthread: Schriftfarbe einer Zelle

25.05.2007 23:30:00

Marcel

Hi Ihr,
wie kann ich die Schriftfarbe nach dem Verlassen einer Zelle verändern.
Beispiel: Wert 18 soll gelb erscheinen
Wert 19 soll orange erscheinen
Wert 20-24 soll grün erscheinen
Wert 25-29 soll rot erscheinen
Wert ab 30 soll schwarz erscheinen
Für Unterstützung wäre ich dankbar

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Schriftfarbe einer Zelle

26.05.2007 00:23:00

Herbert
AW: Schriftfarbe einer Zelle

26.05.2007 00:31:23

Herbert
AW: Schriftfarbe einer Zelle

26.05.2007 01:16:36

Marcel
AW: Schriftfarbe einer Zelle

26.05.2007 01:29:00

Jens
AW: Schriftfarbe einer Zelle

26.05.2007 01:33:48

Mustafa
AW: Schriftfarbe einer Zelle

26.05.2007 01:37:00

Marcel

AW: Schriftfarbe einer Zelle

26.05.2007 00:23:00

Herbert

Hallo Marcel,
kann es ohne Code nicht vollständig lösen.
Als ersten Ansatz jedoch für den Wert 18 die "bedingte Formatierung",
rein in die Zelle und dann Format und bedingte Formatierung
... Zellwert gleich 18 und klicke auf Format zum Farbe auswählen.
... anschließend ist noch eine zweite Formatierung und dritte möglich, dann ist damit schluß und
die Profis können es dann mit den Codes gleich besser lösen.
VG
Herbert

AW: Schriftfarbe einer Zelle

26.05.2007 00:31:23

Herbert

Hi Marcel nochmal,
folgendes habe ich aus dem Archiv kopiert (kann das nicht verlinken, da ich nicht weiß wie)
Es schreibt hier ein Thomas einem Harald E... seinerzeit, denke es ist das was Du suchst.


Hallo Thomas,
hier eine Möglichkeit über Select Case. Code gehört ins betreffende Blattmodul und läuft los,  _
sobald in einer Zelle etwas geändert wird (Bereich kann eingeschränkt werden)
Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target.Value
Case Is = 1
Target.Interior.ColorIndex = 3
Case Is = 2
Target.Interior.ColorIndex = 15
'usw..
Case Else
Target.Interior.ColorIndex = xlNone
End Select
End Sub
Gruss Harald

AW: Schriftfarbe einer Zelle

26.05.2007 01:16:36

Marcel

Hi Harald,
funktioniert sehr gut allerdings wird hier die Hintergrundfarbe der Zelle verändert und nicht die Schriftfarbe.
Hast Du ne Idee?
mfg
Marcel

AW: Schriftfarbe einer Zelle

26.05.2007 01:29:00

Jens

Hallo Marcel
Probier es mal anstelle von:
Target.Interior.ColorIndex = 3
mit:
Target.Font.ColorIndex = 3
Gruß aus dem Sauerland
Jens

AW: Schriftfarbe einer Zelle

26.05.2007 01:33:48

Mustafa

Hallo Marcel,
benutze Statt :
Target.Interior.ColorIndex = 3
dieses hier :
Target.Font.ColorIndex = 3
Rückmeldung obs Hilft wäre nett.
Viele Grüße aus Köln.

AW: Schriftfarbe einer Zelle

26.05.2007 01:37:00

Marcel

Jap funktioniert cool danke

Forumthread: Schriftfarbe einer Zelle

6 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread