Anzeige
Archiv - Navigation
964to968
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
964to968
964to968
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellen Rechts von Target.Adress färben

Zellen Rechts von Target.Adress färben
01.04.2008 11:45:16
Target.Adress
Hallo,
ich habe ein kleinen Problem mit der Ansteuerung von Zellen. Ich muss mehrere Bedingte Formatierungen machen von Zellen. Mehr als 3 lässt Excel in der Version über die eigenen ja leider nicht zu. Ich wollte nun mit einem Makro arbeiten, aber das ist nicht so meine Welt.
Ich habe folgendes was auch sehr gut funkioniert, nur leider immer nur in der Zelle wo die WErte eingegeben werden.
If .Value = "SO" Then
.Interior.ColorIndex = 8
ElseIf .Value = "so" Then
.Interior.ColorIndex = 8
Ich muss aber von der Target.Adress aus, immer die 3 Felder rechts davon in der entsprechenden Farbe einfärben.
Wie krieg ich das denn hin?
Dank im vorraus für Eure Hilfe

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen Rechts von Target.Adress färben
01.04.2008 11:50:01
Target.Adress
Hallo,
Target.Offset(0, 1).Resize(, 3).Interior.ColorIndex = 3
Gruß
Rudi

AW: Zellen Rechts von Target.Adress färben
01.04.2008 12:23:00
Target.Adress
Super Sache, das klappt Prima. Danke Dir

noch was...
01.04.2008 11:52:48
Rudi
das ist Unsinn:
If .Value = "SO" Then
.Interior.ColorIndex = 8
ElseIf .Value = "so" Then
.Interior.ColorIndex = 8
If Ucase(.value)="SO" Then .Interior.ColorIndex = 8
reicht aus.
Wahrscheinlich solltest du ohnehin mit Select Case arbeiten.
Gruß
Rudi
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige