---

Hallo,
kann ich die Hintergrund- / Füllfarbe von Feldern duch eine Funktion ändern.
z.B. 2wenn Zellenwert = 1 dann Füllfarbe Blau sondt grün"

analog geht das auch mit der Schriftfarbe ?

Gruß und Danke vorab!
Lars

------------------
Win XPProf. Vers. 2002, SP2, Solid Edge V18 SP5, P4 CPU 2,8GHz
1 GB RAM

______________________________________________
Mein Freund ist Sauerländer...

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Lars,
Schau Dir die bedingte Formatierung an.
Menü -> Format -> bedingte Formatierung

------------------
Gruß,
runkelruebe                         Herr Kann-ich-nich wohnt in der Will-ich-nich-Straße...

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Schau dir zu diesem Thema die Funktion "Bedingte Formatierung" an; zu finden unter Format > Bedingte Formatierung. Dort kannst du dann deine gewünschten Kriterien definieren:

zB Zellwert >>> entspricht >>> 1 >>> dann Format xyz

------------------
Grüsse

Thomas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

danke, das hab ich gesucht !!!

------------------
Win XPProf. Vers. 2002, SP2, Solid Edge V18 SP5, P4 CPU 2,8GHz
1 GB RAM

______________________________________________
Mein Freund ist Sauerländer...

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von tunnelbauer:
...Dort kannst du dann deine gewünschten Kriterien definieren...

---

Es können dort ja leider nur 3 verschiedene Kriterien definiert werden. Gibt es auch eine Möglichkeit wie man mehr als 3 Kriterien definieren kann (in Excel 97)?

Gruß
Stefan

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Stefan,

das ist erst ab Excel2007 möglich. Ansonsten benötigst du eine Ereignisroutine.

Mal ein einfaches Beispiel:

Code:

---

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    With Target
        If .Address = "$A$1" Then
            Select Case .Value
                Case 1
                    .Interior.ColorIndex = 3
                Case 2
                    .Interior.ColorIndex = 4
                Case 3
                    .Interior.ColorIndex = 5
                Case 4
                    .Interior.ColorIndex = 6
                Case 5
                    .Interior.ColorIndex = 7
            End Select
        End If
    End With
End Sub

---

------------------
Gruß
Nepumuk 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Stefan,

für Versionen vor 2007, brauchst Du VBA schaue hier
Ersatz bedingte Formatierungper VBA

7 Formate sind für Versionen vor 2007 ohne VBA möglich
7 Formate ohne VBA

Gruß Hajo

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Lars,
mit dem Add in  [http://www.xldynamic.com/source/xld.CFPlus.Download.html]CF-Plus[/URL] sind bis zu 30 Formatierungen möglich. Auch Schrift- und Rahmenformate sind machbar.
günther andresen

[Diese Nachricht wurde von günther andresen am 25. Aug. 2007 editiert.]

[Diese Nachricht wurde von günther andresen am 25. Aug. 2007 editiert.]

[Diese Nachricht wurde von günther andresen am 25. Aug. 2007 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke für eure Hilfe, Ihr habt mir sehr geholfen.

Gruß
Stefan

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP