VBA：如何使用密碼對PDF進行保護

Question

我目前使用以下代碼將Excel工作表的一部分輸出為PDF。 我想知道是否也可以在PDF輸出中添加密碼。

Sub print_pdf()

Sheets(Array("Sheet1", "Sheet2")).Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
ThisWorkbook.Path & "\" & NameOfWorkbook _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True

End Sub

Answer 1

一個快速的Google向我顯示了此線程： https : //answers.microsoft.com/zh-cn/msoffice/forum/msoffice_word-mso_win10/save-password-protected-pdf-file-with-vba/e3b0be70-d7a5-421b- 888f-980d35386c40

用戶指出“ Office PDF選項不包括密碼保護選項。”，並建議使用第三方替代方法，例如http://download.pdfforge.org/ （我從未使用過，但是附加線程中的最后一個帖子聲稱具有有效的腳本）。

誠然，該線程大約2年了，所以它可能已經過時了，但是我建議您嘗試使用pdfforge或其他一些第三方替代方法。