Absturz bei "Inhalte löschen"
10.10.2005 14:25:27
Michi
in einem gesperrten Tabellenblatt hab ich folgenden Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If Target.Column = 3 And Cells(Target.Row, 2).Value = "Text:" Then
Target.Select
Sheets("Eingabe").Unprotect "..."
Call Modul11.AutoFitMergedCellRowHeight
Selection.Locked = False
Sheets("Eingabe").Protect "..."
Sheets("Eingabe").EnableSelection = xlUnlockedCells
End If
End Sub
Wenn ich nun in einer freigegebenen Zelle die Inhalte lösche mit der rechten Maus-Taste und "Inhalte löschen", reagiert Excel auf gar nix mehr. Wenn ich mit der "Entf"-Taste lösche, funktioniert es einwandfrei.
Kann mir hier jemand helfen?
Besten Dank im voraus
Michi
Anzeige