Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

In geschützter Zelle in geschütztem Blatt Werterhöhung

Gruppe

BeforeDoubleClick

Problem

Wie kann ich in geschützten Zellen eines geschützten Arbeitsblattes über Doppelklick Werterhöhungen vornehmen?

Lösung
Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.

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