2016-05-31 14 views
1

Ich brauche das Passwort geschützte Word-Dokument in VBA öffnen Es wird nach dem Passwort gefragt, wie über Code -Code zu öffnen:ein Passwort geschützt Öffnen

Dim DPDoc 
Dim DPApp 
Dim DPPath 
DPPath = "C:\MyFolder\PwdProtectdFile.docx" 
Set DPApp = CreateObject("word.Application") 
' It is asking for the password here 
DPDoc = DPApp.Documents.Open(DPPath) 

Antwort

3

einfach ein Argument hinzu:

Dim YourOwnPassword As String 
YourOwnPassword = "TestPWD" 
DPDoc = DPApp.Documents.Open(DPPath, PasswordDocument:=YourOwnPassword) 

Src: https://msdn.microsoft.com/en-en/library/office/ff835182.aspx

+0

Am immer Laufzeitfehler '448' "Named Argument nicht gefunden" Also habe ich mich geändert in DPDoc = DPApp.Documents.Open (DPPath, Passwort = YourOwnPassword) Jetzt ist es immer noch zur Eingabe des Passworts aufgefordert. Es schien, dass es nicht berücksichtigt wurde. Kann jemand bitte helfen –

+0

@udhayakumar: Mein schlecht, für Wort es scheint, es sollte 'PasswordDocument' und nicht nur' Password' sein! Siehe die Änderung – R3uK