如何用vba保护word文档？

在word中可以保护文档以限制用户编辑word文档内容。

在vba中可以使用Document对象的Protect方法保护文档，也可以使用Unprotect方法取消保护,还可以使用ProtectionType属性返回当前的文档是否处于保护状态。

Document对象的Protect方法的语法如下：

expression. Protect(Type, NoReset, Password, UseIRM, EnforceStyleLock)

其中Type参数为保护的类型，NoReset参数表示是否重置窗体域的值，Password为保护密码，UseIRM为是否使用IRM技术，EnforceStyleLock为是否限制对保护区域的格式设置。

以下代码举例演示了如何用vba保护word文档：

Sub QQ1722187970()
    Dim oDoc As Document
    Dim oRng As Range
    Set oDoc = Word.ActiveDocument
    With oDoc
        If .ProtectionType = wdNoProtection Then
        .Protect wdAllowOnlyReading, True, "123", False, False
        Else
        .Unprotect "123"
       End If
    End With
End Sub