[VBA] Blatt kopieren - Blattschutz weg?

[Knufu]

Hallo in die Runde,

folgendes ist mir vorhin aufgefallen.

Ich habe einen kleinen "kopier"-Button, der nichts weiter tut als
- Abfrage eines neuen Namens
- Prüfung ob Name schon vorhanden
- wenn nicht, dann wird das aktuelle Blatt kopiert (ActiveSheet.Copy After:=ActiveSheet)

Nun ist mir aufgefallen, dass in der Kopie des Blattes der Blattschutz deaktiviert ist??!!
Wenn ich es "per Hand" mache bleibt er doch auch drin?!


Danke für Eure Hinweise

 

[de la Cruz]

Nun ja, wenn Deine Kopier-App im Gegensatz zum manuellen Kopieren, den Blattschutz halt aufhebt, dann ist das halt so vorgesehen; wo soll denn dabei das Problem liegen ?

 

[Knufu]

Moin,

was heißt Kopier-App .. eben VBA
und diese hebt eben den Schutz nicht explizit auf.
Es ist einfach nur das Kopieren eines Blattes und das anschließende Umbenennen entsprechend Usereingabe...

 

[de la Cruz]

Nun, Du hattest von eine "kleinen Kopier-Button" gesprochen aber nix näher dazu erklärt !