Office: Excel 2016: Mit VBA Blattschutz aufheben und setzen

Hallo zusammen,

ich habe eine Excel-Tabelle, die mit einem Blattschutz ausgestattet sein soll.
Damit ein Makro korrekt ausgeführt werden kann, muss ich in dem Makro
den Blattschutz aufhaben, das mache ich folgendermaßen:
Sheets("Tabelle1").Protect Password:="passwort123", UserInterfaceOnly:=True

Leider muss das Makro angepasst werden, wenn man das Passwort für
den Blattschutz ändern möchte. Deshalb meine Frage:

-> Kann ich zur Ausführung eines Makros auch den Blattschutz aufheben,
ohne, dass ich das Kennwort explizit angebe? (das ich es z.B. einfach auslese?)

:)

 

Hallo!

Ohne Kennwort kann man nichts aufheben. Es ist zwar leicht dass Kennwort zu knacken, aber dafür gibt hier keine Unterstützung.

Gruß, René

 

Woraus willst du das Passwort auslesen? Aus einer anderen Excelmappe? Aus einer Textdatei? Oder oder oder....? Was ist dein Favorit?

 

Hallo,

verwende Application.InputBox um flexibel zu sein.

Vom BlackBerry gesendet

 

Hallo,

schon mal vielen Dank für die erste Hilfe. *Smilie

Also "außerhalb" von Excel kann ich den Hash ja immer auslesen, das Excel-File ist ja ein Container und wenn man ein bisschen sucht, findet man den Hash unter SheetProtection.

René, der Blattschutz ist kein Kopierschutz und er kann auch nur vor
unbeabsichtigter Veränderung schützen. Der Grund warum ich das machen
will ist total einfach: Die Person, die das File nachher verwalten soll, wäre
damit überfordert, das Passwort auch im VBA-Skript zu ändern, wenn
Sie das Passwort für den Blattschutz ändert. *boah

 

Moin!
Warum sollte sie dies ändern wollen?
Wenn sie die Datei verantwortlich begleiten soll, dann sollte auch das Suchen des Kennworts kein Problem darstellen.
Deshalb auch mein Rat ähnlich René:
Blattschutz ohne Kennwort.
Wer vorsätzlich etwas zerstören will, macht dies!
Wer nicht versehentlich etwas "verbotenes" verändern will, dem reicht ein "normaler" Blattschutz.

Two cents,
Ralf

 

Kann man denn das Blattschutz-Passwort mit VBA auslesen? Oder ist das überhaupt technisch gar nicht möglich?

Ich finde es auch deutlich eleganter, ein Passwort nur an einer Stelle ändern zu müssen (und der Rest ist graue Theorie, obs nun Sinn macht, ein Passwort zu setzen oder nicht).

 

Hallo,

langsam blicke ich jetzt nicht mehr durch bei dir ... normalerweise macht man es so ...

Code:

... alles andere wäre Zauberei *tongue.gif*

 

Das geht nicht, da man dann das Passwort ja eingeben muss!

Also in der Tabelle stehen ganz viele Namen von Leuten. Die
Leute sollen die Inhalte nicht verändern, aber nach ihrem Namen
filtern können. (Ich nehme keinen normalen Filter, weil es meines
Wissens nach keinen AND-Filter gibt).

Das Makro ist der Filter. Als Workaround kann ich zwar innerhalb des
Makros das Passwort knacken und ein Hash-Äquivalentes setzen, aber
ich suche nach einer sauberen Lösung.

Daher nochmal die Frage: Kann VBA technisch das Passwort überhaupt auslesen?

 

Hallo,

wenn du dich doch soooo gut auskennst, was hindert dich daran, den Autofilter freizugeben trotz Blattschutz ? Noch nie damit beschäftigt, oder ?

Oder schreib doch einfach ein Makro, dass die Daten der geschützten Tabelle ausliest ... geht ohne jedes Problem ... und nach den gesuchten Daten filtert ... sollte doch kein Problem für dich sein. *wink.gif*

Wieso stellst du immer wieder die selbe Frage ? Mumpel hat sie dir doch schon beantwortet ... nein ... VBA kann das nicht ... wäre doch auch bescheuert, oder nicht ?

 

War die Ansage unverständlich? Tipps zum Knacken von Passwörtern werden hier nicht gegeben!

Hinterlege das PW als globale Konstante im Code und setz den Schutz per Code

 

Ja, ich denke so mache ichs. Danke nochmal für Eure Hilfe.