Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zeile, in der sich die aktive Zelle befindet, in a

Zeile, in der sich die aktive Zelle befindet, in a
25.02.2009 13:00:45
Karsten

Hallo...
Ich möchte die Zeile, in der sich die aktive Zelle befindet, mit einem anderen Farton (z.B. hellblau) unterlegen.
Kann mir jemand weiterhelfen?
Danke
Gruß
Karsten

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile, in der sich die aktive Zelle befindet, in a
25.02.2009 13:10:39
hary
Hallo Carsten
so

Sub farbe()
ActiveCell.EntireRow.Interior.ColorIndex = 20
End Sub


Gruss Hary

und irgendwann hat er ein blaues Blatt owT
25.02.2009 13:12:38
D.Saster
AW: Zeile, in der sich die aktive Zelle befindet,
25.02.2009 13:18:21
Karsten
Danke Hary,
aber ich meine es anders. Nur in einer besrimmten Tabelle und automatisch.
Also, wenn ich mit den Pfeiltasten hoch oder runter gehe, soll die entsprechende Zeile die Färbung haben. Es muss ein Befehl im Seitencode stehen, aber welcher?
Gruß
Karsten
AW: Zeile, in der sich die aktive Zelle befindet,
25.02.2009 13:25:41
D.Saster
Hallo,

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Target.EntireRow.Interior.ColorIndex = 23
End Sub


Alle anderen Hintergrundfarben werden gelöscht!
Gruß
Dierk

Anzeige
AW: Zeile, in der sich die aktive Zelle befindet,
25.02.2009 13:41:01
Karsten
Hallo Dierk,
danke, Kannst du mir noch schreiben, wie es mit der einzelnen aktiven Zelle geht?
Gruß
Karsten
mit List und Tücke
25.02.2009 13:31:17
D.Saster
Hallo,
ohne andere Farben zu löschen:
Alle Zellen markieren
Format-bedingte Formatierung
Formel ist: =$IV1=1 und Farbe aussuchen.
Code im Tabellenmodul:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Columns(256).ClearContents
Cells(Target.Row, 256) = 1
End Sub


Gruß
Dierk

AW: fascher Code
25.02.2009 13:42:25
hary
Moin Ihr beide
Wurde der falsche Code aus der Zwischenablage uebertragen. Sollte einer zum mitwandern der Farbe sein.Eben total Ausfall vom Net und Comp.
Hat sich aber ein Code gefunden.
sry.
Gruss Hary
Anzeige
AW: eine Zelle
25.02.2009 13:46:28
hary
Hallo
so

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Target.Interior.ColorIndex = 23
End Sub


Gruss hary

AW: eine Zelle
25.02.2009 14:40:37
Karsten
Hallo Hary,
danke, aber ich hab mich für die Version von Dierk entschieden.
Gruß
Karsten
AW: mit List und Tücke
25.02.2009 14:39:36
Karsten
Hallo Dierk,
besten Dank. Geht. das ist schon ganz schön doll.
Gruß
Karsten

306 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige