VBA：打开（未编辑）时创建只读/受密码保护的 Word 文档

Question

我将如何制作一个 vba 程序，该程序启用只读 function 但还需要密码才能在启动时打开文档并且我没有参考密码如果在只读 Z9ED39E2EA9314586B6A985A6E 中，我需要编辑文档

每次我使用文档代码启用只读 function 时，它都会从文档中擦除密码，并且只有只读但可编辑。

wd.SaveAs Filename:="C:\Users\Documents\" & URNa & " - " & URNb & ".docx", Password:=CombinePass, 
ReadOnly=True

Answer 1

Word有两种密码保护：

• 在文件级别
• 在文档级别

SaveAs方法适用于文件级别。 指定密码后，除非提供密码，否则将阻止文件打开。

ReadOnlyRecommended参数设置为true时允许打开文档，但不能将其保存回相同的名称。

所以 1) ReadOnlyRecommended没有达到大多数人的预期，2) 这两个参数本质上是相互矛盾的——两者不能一起使用。

为了允许文件打开，但确保文件内容不能被编辑，有必要在文档级别保护该内容：

wd.Protect(Word.WdProtectionType.wdAllowOnlyReading, Type.Missing, "test", Type.Missing, Type.Missing);

请注意，当这些部分在应用保护之前指定时，这种保护还允许编辑文档的某些部分。