Code auf gesperrte Zellen zulassen
26.08.2022 15:41:23
Manuel
ich habe folgenden Code, damit bei jeder Änderung in einem Bereich eines Tabellenblattes ein Datumsstempel gesetzt wird. Nun möchte ich aber einige Zellen auf dem Blatt für den Zugriff sperren und nur einige zur Eingabe freigeben. Nachdem ich das getan habe, funktioniert der Code nicht mehr. Woran kann das liegen?
Danke für Eure Hinweise.
Hier der Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("B2:S55")) Is Nothing Then
Else
[E3].Value = Now
End If
End Sub
Anzeige