Word VBA教程:UnProtect方法

清除对指定文档的保护。如果对文档没有加以保护,则此方法会导致出错。

expression.UnProtect(Password)

expression   必需。该表达式返回一个 Document对象。

Password   Variant 类型,可选。用于保护文档的口令字符串。口令区分大小写。如果用户在使用一篇设置有口令的文档时没有提供正确的口令,就会显示一个对话框,提示用户输入口令。

VBA示例

本示例解除对活动文档的保护,并以“Blue”为密码。如果文档有密码,则显示一个对话框提醒用户输入密码。


If ActiveDocument.ProtectionType <> wdNoProtection Then
    ActiveDocument.Unprotect Password:="Blue"
End If

本示例解除对活动文档的保护。然后插入文本并对文档进行修订保护。


Set aDoc = ActiveDocument
If aDoc.ProtectionType <> wdNoProtection Then
    aDoc.Unprotect
    Selection.InsertBefore "department six"
    aDoc.Protect Type:=wdAllowOnlyRevisions, Password:="Blue"
End If

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号