Live-Forum - Die aktuellen Beiträge
Datum
Titel
12.10.2025 02:58:05
Kalenderwoche zählen
10.10.2025 15:11:39
Werte aus Zellen in Punktdiagramm, Beschriftung
10.10.2025 11:07:34
"Text in Spalten" ändert die Zahl von 21.1 in 45678
10.10.2025 10:11:05
geöffnete Excel-Datei mit variablen Namen finden
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1704to1708
1704to1708
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

2 passwörter ausprobiert ActiveSheet.Unprotect

Forumthread: 2 passwörter ausprobiert ActiveSheet.Unprotect

2 passwörter ausprobiert ActiveSheet.Unprotect
31.07.2019 08:01:15
Pascal
Hallo zusammen,
folgendes Problem:
Wir benutzen ein Makro das uns verschiedene S-Verweise auf ein Excel File spielt das mit einem Blattschutz versehen ist. Nun wurde bei der letzten Aktualisierung auch das Password mitgeändert und es existieren nun 2 Versionen mit unterschiedlichen Blattschutz Password.
Nun wollte ich wissen ob man einfach 2 unterscheidliche Password abfragen kann und das wenn eins nicht geht dann eben das andere genommen werden soll?
ActiveSheet.Unprotect Password:="*"
Danke & Viele Grüße
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: 2 passwörter ausprobiert ActiveSheet.Unprotect
31.07.2019 08:12:54
MCO
Guten Morgen, Pascal!
Probier das mal...
    On Error Resume Next
ActiveSheet.Unprotect Password:="Passwort1"
if ActiveWorkbook.ActiveSheet.ProtectContents =false then
msgbox "Das erste Passwort ist hier aktiv",vbokonly+vbinformation,"Blattschutz aufgehoben"
else
ActiveSheet.Unprotect Password:="Passwort2"
end if
if ActiveWorkbook.ActiveSheet.ProtectContents then
msgbox "Der Schreibschutz konnte nicht aufgehoben werden",vbokonly+vbExclamation,"Blattschutz bleibt"
Gruß, MCO
Anzeige
AW: 2 passwörter ausprobiert ActiveSheet.Unprotect
31.07.2019 08:23:59
Pascal
Hallo MCO,
sehr gut er sagt mir jetzt welches Password aktiv ist.
Aber geht es auch das er dann automatisch mit meinem makro weitermacht?
Gruß Werner
AW: 2 passwörter ausprobiert ActiveSheet.Unprotect
31.07.2019 08:35:10
Pascal
ok ich muss mich entschuldigen mein Makro läuft durch.
Kann man aber die MsgBox abstellen die sagt: "das erste Passwort ist hier aktiv"?
Danke & Grüße,
Werner
Anzeige
AW: 2 passwörter ausprobiert ActiveSheet.Unprotect
31.07.2019 10:05:20
Marco
Hallo Werner,
Probier das mal:
On Error Resume Next
ActiveSheet.Unprotect Password:="Passwort1"
if ActiveWorkbook.ActiveSheet.ProtectContents =true then ActiveSheet.Unprotect Password:="Passwort2"
VG
Marco
;

Forumthreads zu verwandten Themen

ActiveSheet.Unprotect - Bei Drehfeld
Heinz

Hallo Leute
Im unteren Code wird mir der Blattschutz nicht aufgehoben.
Hätte bitte jemand eine Lösung ?
Danke & Gruß
Heinz H
Option Explicit
Sub Drehfeld1_BeiÄnderung() ActiveSheet.Unprotect Application.Calculate ActiveSheet.Protect End Sub
16.11.2009 22:08:26
Thread-ID: 1117774
5 Beiträge
Anzeige
Worksheet.Protect - Passw per VBA läuft nicht mehr
Max

Hallo zusammen.
Folgendes Makro habe ich seit Jahren ohne probleme benutzt: Sub HBxkxU() On Error Resume Next ActiveSheet.Unprotect Password:="" If Err "0" Then Err = "0" ActiveSheet.Unprotect Password:="XpwX" Else: Stop End If End Sub Es lief anstandslos auf den letzten 2 Excel 2007 Inst...
06.04.2010 15:48:44
Thread-ID: 1150350
4 Beiträge
Anzeige
ActiveSheet.Protect löscht Zwischenablage
Wolfgang

Hallo Forum,
ich hoffe Ihr könnt wieder helfen.
Ich habe ein geschützes Excel Sheet mit wenigen editierbaren Zellen.
Ich habe in VBA ein Zeilenmarkierung programmiert. Mit dem Event 'Selection_Change' wird die jeweils aktive Zeile 'hervorgehoben'. Nachdem die Zellen teilw. geschützt...
06.07.2011 23:03:57
Thread-ID: 1221109
4 Beiträge
Anzeige
Active Sheet in neue Datei mit VBA
Andreas

Hallo Excelfreunde,
Habe folgenden Code der auch funktioniert.
Mit diesem Code kann ich aus meinem aktiven Sheet über einen CommandButton das aktive Sheet in eine Neue Datei die welche laut Makro Vorgabe neu erstellt wird mit allen Inhalten sowie vorhandenen CommandButtons einfügen. Das...
06.08.2014 18:37:07
Thread-ID: 1374800
5 Beiträge
ActiveSheet.Protect sperrt alle Zellen
Martin

Hallo Liebe Mitglieder,
ich habe folgendes Problem:
ActiveSheet.Unprotect Password:="XXX"
'Mein Makro
ActiveSheet.Protect Password:="XXX"
Nachem diese Schleifen durchlaufen wird, sind alle Zellen gesperrt. Auch die Zellen die als "Nicht Gesperrt" Formatiert sind. Zudem könne...
28.09.2015 16:14:32
Thread-ID: 1449790
15 Beiträge
Anzeige
ActiveSheet.Unprotect unter excel 97 SR1
torsten

Hallo...ich habe ein Problem unter Excel 97, wenn ich Methoden wie Unprotect aufrufen möchte... Die Fehlermeldung lautet, dass die Methode fehlerhaft ist.
Wenn ich dann in Excel das Menü öffne, sind diverse Befehle gesperrt (unter anderem auch die Eigenschaft "Blatt schützen" unter Extras->...
13.01.2003 17:12:41
Thread-ID: 202770
3 Beiträge
ActiveSheet.Unprotect funkt nicht
Frank

HalloIch habe in einer Tabelle einen Befehlsknopf zur Ausführung eines Makros eingefügt.
Die Tabelle ist geschützt, damit nur Eingaben in den erlaubten Zellen gemacht werden können. Damit ich Zeilen einfügen kann, muss ich den Blatschutz herausnehmen. Dies funktioniert jedoch nicht mit dem B...
16.02.2003 23:16:32
Thread-ID: 220009
4 Beiträge
ActiveSheet.Unprotect funkt nicht
Frank

HalloIch habe in einer Tabelle einen Befehlsknopf zur Ausführung eines Makros eingefügt.
Die Tabelle ist geschützt, damit nur Eingaben in den erlaubten Zellen gemacht werden können. Damit ich Zeilen einfügen kann, muss ich den Blatschutz herausnehmen. Dies funktioniert jedoch nicht mit dem B...
16.02.2003 23:16:32
Thread-ID: 220010
9 Beiträge
ActiveSheet.Unprotect - Laufzeitfehler
Raik Reinhöfer

Hallo, wer kann mir helfen?Ich will über eine Userform das ActiveSheet (indem Fall: "Teilgewicht") wieder freigeben (Schutz aufheben)ich setze dazu den Befehl ActiveSheet.Unprotect eindas funktioniert aber nur einmal.
Zur Erklärung:
ich gebe das Blatt frei, schreibe dann einige Date...
25.06.2003 19:36:14
Thread-ID: 273725
8 Beiträge
ActiveSheet.Unprotect - Laufzeitfehler
Raik Reinhöfer

Hallo,ich wende mich heute nochmal mit meinem Problem vom 25.06.03 an euch. Vielleicht ist heute zufällig jemand im Forum, der noch ne idee hat wie man mein Problem lösen kann.Bitte einfach nach Raik suchen, da seht ihr was alles schon probiert wurde.Danke euch im voraus.Gruß Raik

27.06.2003 17:58:28
Thread-ID: 274840
3 Beiträge
activesheet.unprotect auf command button
Kiefer Thomas
halloele,

hilfe. ich habe einige makros auf tasten-kombinationen gelegt.jetzt wollen einige benutzer aber doch mit der maus einen button anklicken.
aber leider kann ich in dem aktiven blatt (indem der commandbutton liegt) nicht den blattschutz mit activesheet.unprotect aufheben. es kommt...
24.11.2003 10:44:13
Thread-ID: 342511
5 Beiträge
activesheet.unprotect
Mara
Hallo!!
....... löst bei einer falschen kennworteingabe immer eine fehlermeldung aus..... (ich meine nicht die Fehlermeldung von Excel, dass das Kennwort falsch ist, sondern die des VBEditors)
wie kann ich diese (2.) abfangen?
ich habe es mit
on error goto 0
versucht........
21.01.2004 07:49:08
Thread-ID: 367622
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige