10
Datenzugriff auf Kennwortgeschützte Excel
Hallo,
ich möchte mit Sverweis usw. auf eine Kennwortgeschützte Datei verweisen und mir Daten
für User ziehen welche keinen vollen Zugriff auf die Kennwortgeschützte Datei haben dürfen.
Jetzt ist es so, dass wenn der User sagt Inhalt aktivieren halt die Kennwortabfrage kommt.
Kann man das irgendwie anders machen?
MfG
Florian86
ich möchte mit Sverweis usw. auf eine Kennwortgeschützte Datei verweisen und mir Daten
für User ziehen welche keinen vollen Zugriff auf die Kennwortgeschützte Datei haben dürfen.
Jetzt ist es so, dass wenn der User sagt Inhalt aktivieren halt die Kennwortabfrage kommt.
Kann man das irgendwie anders machen?
MfG
Florian86
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 301182
Url: https://administrator.de/contentid/301182
Printed on: April 26, 2024 at 11:04 o'clock
10 Comments
Latest comment
Hi,
E.
für User ziehen welche keinen vollen Zugriff auf die Kennwortgeschützte Datei haben dürfen.
Also gar keinen Zugriff? Wer das Passwort nicht kennt, kann gar nicht auf die Datei zugreifen. Vollkommen unabhängig von den Zugriffsberechtigungen im Filesystem.Jetzt ist es so, dass wenn der User sagt Inhalt aktivieren halt die Kennwortabfrage kommt.
Ja sicher. Sonst könnte doch jeder auf diese Weise den Kennwortschutz umgehen.E.
also gibt es keine möglichkeit?
oder kann man in der Datei das kennwort irgendiw als vba hinterlegen?
MfG
Florian
oder kann man in der Datei das kennwort irgendiw als vba hinterlegen?
MfG
Florian
Also Kugel sagt:
Workbooks.Open Filename:= "C:\Documents and Settings\My Documents\Book2.xls", Password:="YourPasswordHere" 
Irgendwie ne coole Idee: M$ könnte doch wirklich mal eine ACL-Lösung am Besten mit AD-Integration in ihre Dateien einbauen ;)
Sowas ähnliches gibt es doch schon: https://support.office.com/en-us/article/Information-Rights-Management-i ...
Workbooks.Open Filename:= "C:\Documents and Settings\My Documents\Book2.xls", Password:="YourPasswordHere"
hier kommt dann immer folgender Fehler....
hier kommt dann immer folgender Fehler....
Nun funktioniert das makro, nur leider kommt immer zuerst die passwordabfrage welche ich abrechen kann
und danach wird erst das makro ausgeführt und macht was es soll.
kann das irgendwie vorher schon machen oder kommt die kennwortabfrage immer zuerst?
mfg
florian
und danach wird erst das makro ausgeführt und macht was es soll.
kann das irgendwie vorher schon machen oder kommt die kennwortabfrage immer zuerst?
mfg
florian
Zitat von @Florian86:
Nun funktioniert das makro, nur leider kommt immer zuerst die passwordabfrage welche ich abrechen kann
und danach wird erst das makro ausgeführt und macht was es soll.
kann das irgendwie vorher schon machen oder kommt die kennwortabfrage immer zuerst?
Vor dem Befehl zum Öffnen die Alerts abschaltenNun funktioniert das makro, nur leider kommt immer zuerst die passwordabfrage welche ich abrechen kann
und danach wird erst das makro ausgeführt und macht was es soll.
kann das irgendwie vorher schon machen oder kommt die kennwortabfrage immer zuerst?
Application.DisplayAlerts = FalseDas korrekte Passwort musst du natürlich beim Öffnen übergeben, das sollte klar sein.
Gruß jodel32
Hallo Jodel,
mein Nakro sieht nun so aus...
Sub Workbook_open()
Dim Mappe As Workbook
Application.DisplayAlerts = False
Set Mappe = Application.Workbooks.Open(Filename:="C:\Users\decker-f\Desktop\test.xlsm", Password:="test")
Application.DisplayAlerts = True
End Sub
es kommt aber trotzdem die Passwortabfrage.
Mit freundlichen Grüßen
Florian86
mein Nakro sieht nun so aus...
Sub Workbook_open()
Dim Mappe As Workbook
Application.DisplayAlerts = False
Set Mappe = Application.Workbooks.Open(Filename:="C:\Users\decker-f\Desktop\test.xlsm", Password:="test")
Application.DisplayAlerts = True
End Sub
es kommt aber trotzdem die Passwortabfrage.
Mit freundlichen Grüßen
Florian86
Vermutlich hab ihr zwei Kennwörter vergeben, denn man kann fürs Lesen und fürs Schreiben ein Kennwort definieren.
Das Kennwort zum beschreiben muss man dann auch mitgeben wenn man das Sheet nicht readonly öffnet!
Parameter WriteResPassword
Einfach mal lesen !
https://msdn.microsoft.com/en-us/library/office/ff194819.aspx
Öffne es also Readonly wenn die User darin nichts ändern können sollen. Aber das Passwort steht ja eh im Quelltext x)
Das Kennwort zum beschreiben muss man dann auch mitgeben wenn man das Sheet nicht readonly öffnet!
Parameter WriteResPassword
Einfach mal lesen !
https://msdn.microsoft.com/en-us/library/office/ff194819.aspx
Öffne es also Readonly wenn die User darin nichts ändern können sollen. Aber das Passwort steht ja eh im Quelltext x)
Application.DisplayAlerts = False
Workbooks.Open Filename:= "C:\Documents and Settings\My Documents\Book2.xls", Password:="YourPasswordHere",ReadOnly:=True
Application.DisplayAlerts = True