springende farbliche Markierung

Bild

Betrifft: springende farbliche Markierung
von: mary
Geschrieben am: 26.02.2005 15:44:06
wie kann man von einer Zelle zur anderen Springen und die Farbmarkierung der Zelle geht mit? Als Markierung!

Bild

Betrifft: AW: springende farbliche Markierung
von: Rudi
Geschrieben am: 26.02.2005 16:22:21
Anrede
Frage
Gruß
mfg Rudi
Bild

Betrifft: AW: springende farbliche Markierung
von: Manfred
Geschrieben am: 26.02.2005 17:10:32
Hallo mary,
Schreibe folgenden VBA-Code in den Codebereich einer Tabelle (z.B. Tabelle1):
Public Farbe As Long

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Select Case Cells(Target.Row, Target.Column).Interior.ColorIndex
        Case Is < 0
            Cells(Target.Row, Target.Column).Interior.ColorIndex = Farbe
        Case Is > 0
            Farbe = Cells(Target.Row, Target.Column).Interior.ColorIndex
     End Select
End Sub

Es werden nur "farblose" Zellen mit der vorherigen Zellenfarbe versehen. wird eine Zelle mit einer anderen Farbe selektiert, so wird in den nachfolgenden Zellen diese
Farbe eingetragen.

Gruß Manfred
 Bild

Beiträge aus den Excel-Beispielen zum Thema "springende farbliche Markierung"