在VBA

Question

打開一個密碼保護的Word文檔，我需要打開VBA 密碼保護的Word文檔時它被要求輸入密碼，如何通過代碼打開 代碼：

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) 

Answer 1

只需添加一個參數：

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

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