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"