Aktive Zelle markieren
21.02.2018 10:23:14
Nele
ich habe versucht die aktive Zelle in einer Arbeitsmappe farblich zu hinterlegen. Leider funktioniert der Code bei mir nicht ?
Dim lastcell As Range
Dim farbe As Integer
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
lastcell.Interior.ColorIndex = farbe
farbe = Target.Interior.ColorIndex
Target.Interior.ColorIndex = 4
Set lastcell = Target
End Sub
Grüße Nele