Blatt schützen u mit macro inhalte löschen?

[Mawerick]

Hallo
Ich habe ein Problem, ich weiss nicht ob ich hier Richtig bin.
Vielleicht kann mir jemand ein Tip geben...

Ich habe Tabellen u Listen über mehrere Blätter verteilt, da diese sich über Wochen füllt.
An der Letzten angekommen, wurde eine Schaltfläche eingefügt damit ich verschiedene wechselnde Inhalte löschen kann.

Sobald ich aber die Blätter per Passwort schütze, bekomme ich die Fehlermeldung

Laufzeitfehler 1004.

Gibt es da eine andere Lösung, ich muss diese Datei an mehrere Leute verteilen, und auf konwentionellem Weg löschen diese immerwieder die Formeln?

Danke im vorraus für jede Hilfe

[Kl@us-M.]

Hi,

dann heb im Code, der durch Deine Schaltfläche angestossen wird, den Blattschutz auf, führe Dein Makro aus und schütze das Blatt per Code wieder...

[RPP63]

Moin und nur ergänzend:

Solltest Du mehrere Makros haben, die ein Aufheben und Wiedererstellen des Blattschutzes benötigen, ist es übersichtlicher, im Workbook_Open das Blatt zu schützen und den Parameter UserInterfaceOnly:=True mitzugeben.
Dies ermöglicht VBA, Änderungen vorzunehmen, ohne den Schutz jedesmal aufheben zu müssen.
Da dies flüchtig ist, also gilt, während die Mappe geöffnet ist, muss der Umweg über das Open erfolgen.

Code:

Worksheets("MeinBlatt").Protect "MeinKennwort", UserInterfaceOnly:=True

Gruß Ralf