Hallo Robert.
Versuchs damit:
ThisWorkbook.Worksheets("SoheißtmeinBlatt").protect Password:="MeinPasswort", DrawingObjects:=True, Contents:=True, Scenarios:=True, UserInterfaceOnly:=False
Damit ist alles geschützt und mit Passwort versehen. Die ganzen Parameter sind aber optional, du kannst sie also auch weglassen.
Aufheben geht mit ThisWorkbook.Worksheets("SoheißtmeinBlatt").unprotect
Gruß, Alex.
AW: Arbeitsmappe über Makro schützen
22.09.2005 10:02:39
Robert
Das war jetzt, meine ich, der Befehl für den Blattschutz. Ich möchte aber die komplette Arbeitsmappe schützen, so dass der Anwender dann die ausgeblendeten Blätter (Worksheets) nicht mehr einblenden kann.
Anzeige
AW: Arbeitsmappe über Makro schützen
22.09.2005 10:04:44
Alexander
Ach so.
Um ein Blatt dem Anwender ganz wegzunehmen, kannst du folgenden Code verwenden: ThisWorkbook.Worksheets("SoheißtmeinBlatt").Visible=xlSheetVeryHidden
Damit kann man ein Blatt nur noch vom Code aus wieder sichtbar machen. Das verwende ich auch sehr gerne.
Gruß, Alex.
AW: Arbeitsmappe über Makro schützen
22.09.2005 10:12:27
Robert
OK, das gefällt mir. Und wie kriege ich das ganze wieder rückgängig?