Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
316to320
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
316to320
316to320
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

If-Funktion

If-Funktion
06.10.2003 14:09:20
Peter
Hallo,

ich habe mal eine Frage. Und zwar möchte ich gerne
eine "if"-funktion (falls es die in Exel gibt)
ausführen, die bei einem Wort nur den Hintergrund
einer Spalte/Zelle ändert. Ist diesen überhaupt
möglich/machbar in Exel.

Ich würde gerne es umsetzen, das bei dem wörtchen
"offen" die Zelle rot ist und bei dem wörtchen
"erledigt" grün.

kann mir jemand dazu einen tutorial geben oder
damit ich es lösen kann wenn es machbar ist?

danke!

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: If-Funktion
06.10.2003 14:10:57
Hajo_Zi
Hallo Peter

siehe Dir mal Format, bedingte Formatierung an

Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.

http://home.media-n.de/ziplies/

AW: If-Funktion
06.10.2003 14:14:11
felix
das machst du am besten nicht in vba, sondern im menue format:
format/bedingte formatierung: bedingung: zuellwert ist gleich ="offen" --> stelle dann das gewuenschte format ein. genauso generierst du die zweite bedingung und kopierst das format auf alle zellen wo du diese bedingung haben willst.
Anzeige
AW: If-Funktion
06.10.2003 14:17:43
Andi_H
Hallo Peter,

ja, ist möglich. Sie wie folgt aus:


Sub faerben()
Dim ber As Range
Set ber = ActiveSheet.UsedRange
Dim zelle As Range
For Each zelle In ber
If zelle = "offen" Then
zelle.Interior.Color = vbRed
ElseIf zelle = "erledigt" Then zelle.Interior.Color = vbGreen
Else
zelle.Interior.ColorIndex = 0
End If
Next
End Sub


Diesen Code in ein Modul kopieren und das Makro "Faerben" starten

Gruß

Andi
AW: If-Funktion
06.10.2003 14:29:30
perter
Dank euch!

einen schritt weiter im exel-wissen*g*

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige