Habe Probleme mit diese Funktion.
Wer kann nach prüfen wo ist die fehler?
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
ActiveSheet.Unprotect
Range("B" & Target.Row & ":B" & Target.Row).ClearContents
Range("D" & Target.Row & ":I" & Target.Row).ClearContents
Range("K" & Target.Row & ":K" & Target.Row).ClearContents
Range("M" & Target.Row & ":M" & Target.Row).ClearContents
ActiveSheet.Protect
End Sub
Danke
Gruß Carlos