Blattschutz per VBA aktivieren und deaktivieren von Thilo vom 16. 11. 2005 11:46:52 AW: Blattschutz per VBA aktivieren und deaktivieren - von Gerhard am 16. 2005 11:59:16 Betrifft: Blattschutz per VBA aktivieren und deaktivieren von: Thilo Geschrieben am: 16. 2005 11:46:52 Hallo, ich brauche eine Excel-Tabelle die nur durch VBA-Funktionen gefüllt werden darf. Der Benutzer darf aber fleißig drin rum klicken und dadurch Dialoge öffnen. Ich dachte an einen Blattschutz, der sozusagen die Tabelle vor manuellen Benutzereingaben bewahrt. Excel 2013 - einzelnes Blatt mit VBA Passwort sperren - MS-Office-Forum. Aber damit meine Dialoge was rein schreiben können, muss der Blattschutz für diese Zeit aufgehoben werden. Wie sieht denn in VBA der Code um den Blattschutz zu aktivieren bzw. zu deaktivieren aus? Oder völliger Bockmist und es geht anders sauberer? ciao, Thilo Betrifft: AW: Blattschutz per VBA aktivieren und deaktivieren von: Gerhard Geschrieben am: 16. 2005 11:59:16 Hallo! Ich habs gelöst indem ich ein Macro geschriben habe für BlattschutzAus u. Blattschutz.
9/9 Fertig! Erfahren Sie mehr über das Erstellen von Makros > Gehe zum nächsten Kapitel: MsgBox
Und dann wird das Blatt erst wieder mit dem worksheet_deactivate Ereignis gesperrt. Also das mit dem Blatt sperren Klappt. Das gefällt mir. Jedoch ist der Kalender in bestimmten Spalten gesperrt. Dies ist auch so gewollt. Sollte jetzt durch die Teamassistentin zusätzlich etwas geändert werden muss diese natürlich den Blattschutz aufheben. Dafür habe ich einen CommandButton. Dort würde ich gerne eine Abfrage nach dem Passwort eintragen und nach richtigen Passwort den Blattschutz im aktiven Blatt aufheben. Wird das Dokument geschlossen soll es wieder mit dem gleichen Passwort geschützt werden. Ich hoffe ich habe nun das Thema gut erklärt. Blattschutz VBA mit PW und Bedingungen. Gibt es hierfür eine Lösung? Diesen Code in ein allgemeines Modul einfügen: Code: Dem CommandButton das Makro "entsperren" zuweisen. In das Worksheetmodul vom Start Blatt noch diese Zeilen ergänzen: Hallo habe nun folgenden Code eingefügt. Private Sub Blattschutz_aufheben_Click() On Error Resume Next If otectContents = False Then GoTo Fehler ActiveSheet.
Laden Sie Kutools for Excel jetzt herunter und testen Sie es kostenlos! In Verbindung stehende Artikel: Wie schütze ich mehrere Arbeitsblätter gleichzeitig in Excel? Wie lege ich ein Passwort fest, um die Arbeitsmappe zu schützen? Wie schütze / sperre ich VBA-Code in Excel?
2004 17:46:31 Probiers mal mit: otect password:="SuperschlaueskniffligesPasswort" Claus Geschrieben am: 30. 2004 18:02:28 Hallo Claus, danke für deine Hilfe, aber Passwortabfrage erscheint nicht. Wie muß ich das denn schreiben? Habe ein Makro, dass wenn ich auf der Startseite auf den Button klicke, das entsprechende Tabellenblatt erscheint. Da hab ich es rein gepackt. Geht aber nicht. Dann hab ich es mit folgendem probiert: Private Sub Sheet_Open() otect Password:="Wellness" End Sub Geht aber auch nicht. Hilfe. Excel vba blatt schützen mit passwort der. Danke noch mal Geschrieben am: 30. 2004 18:02:56 von: TGH Geschrieben am: 31. 2004 04:16:07 Hallo Claus, versuchs mal so: Private Sub Worksheet_Activate() Code muss in Dein Arbeitsblatt Gruss Geschrieben am: 31. 2004 06:35:08 Ich hab das ins arbeitsblatt eingefügt, aber keine meldung, keine abfrage. tut sich garnichts. Wie vorher ohne code. von: Nepumuk Geschrieben am: 31. 2004 07:01:23 Hallo Birkel, versuch mal das: Gruß Nepumuk Excel-Beispiele zum Thema "Tabellenblätter mit Passwort schützen" Passwort vergeben und bei CheckBox-Aktivität abfragen Beim Öffnen der Arbeitsmappe Passwort abfragen Passwortgeschützte Mappe öffnen, Daten kopieren, schliessen Passwortabfrage mit ShortCut-Aufruf Aktivierung von Berechnungen bei gültiger Passworteingabe Blattschutz mit und ohne Passwort aufheben und setzen Automatische Passworteingabe in Internet-Formular Masterlistsystem mit Passwortabfrage bei Blattauswahl