Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 08:41:49
VBA: Probleme mit pdftk zum Zusammenfügen
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1192to1196
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1192to1196
1192to1196
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kennwort per VBA setzen

Kennwort per VBA setzen
Eddi
Hallo zusammen,
ich hätte eine Frage zum Thema Kennwortschutz per VBA.
Ich habe also eine Excel-Datei, die ich gerne mit einen Kennwort schützen möchte. Die Passwortabfrage soll aber schon vor dem eigentlichen öffnen der Mappe kommen. Das ganze geht ja händisch bei Office 2007 unter "Office - Vorbereiten - Dokument verschlüsseln".
Ich möchte nun gerne, dass das Passwort per VBA gesetzt oder geändert wird (Dokument muss anschließend sicherlich gespeichert werden). Gibt es dafür eine Funktion?
Merci
Eddi

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Kennwort per VBA setzen
27.12.2010 11:56:00
Herbert
Hallo Eddi,
in "DieseArbeitsmappe" setzt Du ein " 

Private Sub Workbook_Open()". Darin fragst Du per Inputbox nach dem Passwort. Wenn das  _
eingegebene mit dem hinterlegten übereinstimmt, dann kannst Du die Mappe freigeben und wenn nicht, dann schließen.
Und jetzt willst Du sicher auch noch wissen, wie das dann aussieht? Also bitte:
Option Explicit


Private Sub Workbook_Open()
Dim strPasswortVorhanden$, strPasswortEingabe$
On Error GoTo ende
strPasswortVorhanden = "Passwort"
strPasswortEingabe = InputBox("Bitte geben Sie das Passwort ein:", "Passwort")
If strPasswortVorhanden  strPasswortEingabe Then GoTo schließen
GoTo ende
schließen:
MsgBox "Die datei wird aufgrund eines falschen Passwortes geschlossen!"
'ohne rückfrage speichern
Application.DisplayAlerts = False
ActiveWorkbook.Close
Application.DisplayAlerts = True
ende:
End Sub


Gruß Herbert
Anzeige
AW: Kennwort per VBA setzen
27.12.2010 12:41:35
Eddi
Vielen Dank, aber so hatte ich es nicht gemeint. Ich möchte quasi, das, was man normalerweise händisch über "Office--Vorbereiten--Dokument verschlüsseln" macht über VBA machen. Der Nutzer soll sozusagen nicht mitbekommen, das er beim nächsten öffnen der Datei ein Passwort benötigt.
Gruß, Eddi
AW: Kennwort per VBA setzen
28.12.2010 16:35:00
Herbert
das kannst Du ja mal mit dem Makrorekorder aufzeichnen und dann entsprechend in Deinen Code einbauen!
Servus

18 Forumthreads zu ähnlichen Themen

Word Passwort entfernen
Holger

Hallo zusammen,
wie ich ein Excel-Passwort deaktieviere weiss ich, aber geht das auch bei Word ? Und wenn ja, wie ?
Gruss
Holger
06.02.2009 12:17:00
Thread-ID: 1047714
5 Beiträge
Anzeige
Makro Passwortschutz entfernen
Joni

Hallo,
ich habe über 5 Ecken eine Excel-Tabelle mit Makros erhalten. Bevor ich diese ausführe würde ich mir die Makros gerne ansehen. Das Projekt ist aber geschützt. Gibt es eine Möglichkeit den Code trotzdem einsehen zu können bzw. den Schutz abzuschalten? Ausführen ohne den Inhalt zu kenn...
07.11.2010 21:09:11
Thread-ID: 1185586
19 Beiträge
Kennwort zum Öffnen per VBA setzen
Arthur
Hi Excelianer.
Da denkt man es ist einfach und dann möchte es nicht ...
Ich möchte ein gerade frisch erzeugtes Workbook (Excelmappe) mit einem Lesekennwort versehen ("Kennwort zum Öffnen" in den Speichern unter->Tools->Allgemeine Optionen).
Application.Workbooks.Add
ActiveWork...
10.07.2014 11:53:03
Thread-ID: 1369656
6 Beiträge
Anzeige
VBA Passwort vergessen
Michel

Hallo zusammen
Ich Dummkopf habe in meiner Excel das VBA Passwort vergessen und komme nun nicht mehr zu dem Code.
Kann mir hier jemand helfen?
Hier wäre noch meine File:
https://www.herber.de/bbs/user/95639.xlsm
Danke vorbau für eure Hilfe
Gruss
Michel
09.02.2015 14:53:16
Thread-ID: 1408201
5 Beiträge
VBAProjekt Passwort vergessen
Chris

Hallo Leute,habe mal vor langer Zeit ein kleines VBAProjekt mit Passwort geschützt.
Jetzt müsste ich das Projekt erweitern und mir fällt das Passwort nicht mehr ein.
Kan mir da jemand Helfen?
Gruß
Chris
20.08.2002 10:52:46
Thread-ID: 150507
3 Beiträge
Kennwort zum Öffnen + Makros aktivieren
Kisska

Hallo allerseits,
wieso werden Makros deaktiviert, wenn man eine Datei mit dem Kennwort zum Öffnen verseht? Kann man dies irgendwie umgehen?
Viele Grüße
Kisska
28.05.2017 17:29:12
Thread-ID: 1560766
6 Beiträge
VBA-Passwort vergessen!
Nadine

Hallo zusammen!

Ich habe vor einiger Zeit ein VBA-Projekt (Add-In) per Passwort geschützt, und habe dieses nun vergessen!

Gibt es irgendeine Möglichkeit, es wiederzufinden? Das Paswort bestand aus einem Wort und Ziffern.
Ich weiß noch...
...das Wort (aber nicht, ob Groß- o...
30.06.2003 13:58:40
Thread-ID: 275418
6 Beiträge
VBA Passwort vergessen
Carsten Kramer
Hallo,
Habe meine Makros und Autotexte in Word geschützt und kann mich nicht mehr an mein Passwort erinnern. Kann mir jemadn helfen wie ich mein Passwort rauskriege? ich habe es bereits mit AVPRo probiert aber es erschein nur " Password unavailable"
Danke.
Carsten
16.11.2003 00:00:32
Thread-ID: 338770
4 Beiträge
Anzeige

Links zu Excel-Dialogen

InputBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
6
18
5
2
4
2
5
5
3
7
1
10
8
4
3
2
13