Blattschutz Werner Hallo nochmal, ich habe noch eine Frage. Wie kann ich alle Tabellenblätter mit einen Blattschutz versehen, z.B. mit Workbook_open() d.h. wenn ich die Datei öffne sollen alle Tabellenblätter mit einen Passwort geschützt werden. Gruß Werner
AW: Blattschutz 30.09.2009 22:04:32 Uduuh Hallo, das klemmt natürlich bei deaktivierten Makros. In DieseArbeitsmappe: Private Sub workbook_open() dim wks as worksheet for each wks in worksheets wks.protect "passwort" next End Sub Gruß ausm Pott Udo
AW: Blattschutz 30.09.2009 22:12:50 Werner Hallo Udo, Danke , und wie ist das wenn ich einige Zellen z.B. b5,c4:h5 trotzdem bearbeiten will? Gruß Werner
dann musst du ... 30.09.2009 22:19:06 Uduuh Hallo, ... denen vorher die Geschützt-Eigenschaft wegnehmen. Gruß ausm Pott Udo
AW: Blattschutz 30.09.2009 22:20:15 Gerd Hallo Werner, dann nimmst Du bei diesen Zellen den Schutz raus, per Code Tabelle1.Range("A1").Locked=False Gruß Gerd Anzeige
AW: od mit Button.. 30.09.2009 23:00:45 Werner Hallo zusammen, Danke für die Lösungen :-) Gruß Werner