durch folgenden Ausdruck bekomme ich einen Fehler 1004.
Range("A1:E3,A4:D6,E4:E5").Select
Selection.Locked = True
Selection.FormulaHidden = True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
gibt es vielleicht eine andere Möglichkeit dieselbe Wirkung zu erzielen?
Gruß
Thomas