BeforeDoubleClick-Event nur für eine Zelle
14.09.2018 10:20:46
Felix
ich bin neu im Forum und vor allem für eine Fragestellung eingetreten.
Ich habe für eine Excelfunktion ein Makro eingefügt, welches ich so in einem anderen Forum gefunden habe.
Nun habe ich folgendes Problem, durch dieses Makro soll erreicht werden dass Zellen die doppelt angeklickt werden sich rot färben. Das funktioniert auch soweit, allerdings würde ich diese Funktion gerne auf ein paar bestimmte Zellen Beschränken, welcher Befehel fehlt mir?
Anbei mein momentaner Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, cancel As Boolean)
Worksheets("Checkliste").Unprotect Password:="Toologic2018?"
With Target
If .Interior.Color = 255 Then
.Interior.Color = vbWhite
Else
.Interior.Color = 255
If Target.Locked = False Then
End If
End If
cancel = True
End With
Worksheets("Checkliste").Protect Password:="Toologic2018?"
End Sub
Danke für Eure Bemühungen.
Grüße
Anzeige