Celkleur indien geselecteerd

[del pierro]

Hallo allemaal,

Hoe kan ik de celkleur automatisch laten wijzigen, wanneer deze cel geselecteerd is
en zodra ik deze cel "verlaten"heb weer in z'n oorspronkelijke kleur terugspringt.

Bedankt voor de hulp.

Groeten,
Del Pierro

 

[Ad Becude]

Del Pierro,
Deze heb ik eens gevonden.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Sheets(1).UsedRange.Interior.ColorIndex = xlNone
    Target.Interior.ColorIndex = 3
End Sub