Öffnen Sie das Passwort-geschützte excel Datei aus vba ohne die Passwort-Abfrage

Habe ich zum öffnen einer excel-Datei jeden Tag, und aktualisieren Sie die Inhalte, um die neuesten sales-Daten. Ich möchte, dies zu automatisieren mit windows task-scheduling. Da die excel-Datei ist durch ein Passwort geschützt, ich habe gelesen, dass der beste Weg, um erstellen Sie eine weitere excel-Datei mit einem workbook_open-makro, das öffnet die gewünschte excel-Datei.
Das problem ist aber, dass der code, den ich gefunden, noch wird der Benutzer aufgefordert, das Passwort einzugeben. Ich kann nur enter drücken und es öffnet sich dann, aber warum gibt es immer noch die Aufforderung für ihn? Ich bin mit Excel 365, gibt es eine Abhilfe für dieses oder mache ich etwas falsch?

Versuchte ich es mit ReadOnly:=False und ohne, nichts geändert. Wenn ich ReadOnly:=True funktioniert es, aber dann kann ich nicht speichern Sie die Datei nach den änderungen.

Dies ist der code den ich verwende:

Sub Workbook_Open()
  Application.DisplayAlerts = False
  Workbooks.Open Filename:="Path\file.xlsx", Password:="*****", ReadOnly:=False
  Application.DisplayAlerts = True
  ThisWorkbook.Close SaveChanges:=False
End Sub
  • Während die meisten Menschen hassen die Idee, es zu benutzen, wenn er ausgeführt werden, während niemand aktiv auf dem system, mithilfe der Tastaturbefehle möglicherweise nicht so schrecklich.
  • Wenn Sie nicht geben Sie das Kennwort ist nicht die Datei immer noch schreibgeschützt ist? Könnten Sie tun, ein speichern-statt wie beim öffnen, als nur zu Lesen?
  • Du hast Recht @tjb1, es ist nur Lesen, wenn ich einfach enter drücken, nicht bemerken, dass. Und Nein, wenn ich einen save-as, wie soll ich das öffnen der neuen Datei? Auf der anderen Seite, ich könnte speichern Sie die Datei woanders ohne passoword, update und speichern Sie es als ein Passwort geschützt über das neue! Glaube nicht, dass es der Weg, danke für die Idee!
  • Es läuft auf meiner Maschine, die nicht verwendet werden, die Zeit, also werde ich überprüfen, dass die option mit sendkeys auch @Rdster, wusste nicht, könnten Sie das mit vba.
  • Ist die Arbeitsmappe mit Passwort geschützt oder schreiben Sie reserviert? Wenn die Arbeitsmappe schreiben, ist das Recht vorbehalten Befehl sollte Workbooks.Open Filename:="Path\file.xlsx", WriteResPassword:="*****", ReadOnly:=False
  • Das war der Trick @Vincent G! Vielen Dank und poste es als Antwort, wenn Sie wollen, dass die Punkte 🙂

InformationsquelleAutor Thorka Mae | 2016-11-08
  1. 3

    Ist die Arbeitsmappe mit Passwort geschützt oder schreiben Sie reserviert?

    Schreiben vorbehalten-Dateien können nur geöffnet werden, Lesen nur ohne das richtige Passwort eingeben, beim Passwort geschützt kann nicht geöffnet werden.

    Wenn die Arbeitsmappe schreiben, ist das Recht vorbehalten, Befehl:

    Workbooks.Open Filename:="Path\file.xlsx", WriteResPassword:="*****", ReadOnly:=False
    InformationsquelleAutor Vincent G
  2. 0

    versuchen Sie dies:

      Application.DisplayAlerts = False
  Workbooks.Open "path\file.xlsx", , , , "password"
  Application.DisplayAlerts = True
  ThisWorkbook.Close SaveChanges:=False
    • Sie verwendet lediglich eine andere syntax auf die Arbeitsmappen.Öffnen, der code ist der gleiche, also Nein, funktioniert nicht.
    • es ist die Arbeit in excel 2010... wenn ich wieder zu Haus, ich check in office 2013-vielleicht wird mehr kurz vor dem zu 365
    InformationsquelleAutor areklipno
Schreibe einen Kommentar