Gruppe
Ereignis
Problem
Wie kann ich in geschützten Zellen eines geschützten Arbeitsblattes über Doppelklick Werterhöhungen vornehmen?
ClassModule: Tabelle1
Private Sub Worksheet_BeforeDoubleClick( _
ByVal Target As Range, Cancel As Boolean)
Cancel = True
ActiveSheet.Unprotect
Target.Value = Target.Value + 1
ActiveSheet.Protect
End Sub