0

リンク広告セットの保護を読み取り専用に解除する Word (2010) マクロがあります。

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

Selection.WholeStory
Selection.Fields.Unlink
Selection.StartOf


ActiveDocument.Protect Password:="", NoReset:=False, Type:= _
    wdAllowOnlyReading, UseIRM:=False, EnforceStyleLock:=False

ドキュメントはフォーム フィールドとしてのみ開き、いくつかのチェックボックスが含まれています。マクロを実行してドキュメントへの変更を保存すると、保存前にオンにすると保護状態が読み取り専用であるにもかかわらず、フォーム フィールドのみとして再度開きます。

奇妙なことに、保護を手動で読み取り専用に設定して保存すると、読み取り専用属性が固執します。

なぜこれが起こっているのかについてのアイデアはありますか?

4

3 に答える 3

0

これを試して、ドキュメントを読み取り専用にします。

Private Sub CommandButton1_Click()
Dim sPassword As String
sPassword = "YourPasswordHere"
.Protect NoReset:=True, _
Password:=sPassword, _
Type:=wdAllowOnlyReading
End With
End Sub

その後、コードに入力したパスワードを使用して、開発者タブからドキュメントの保護を解除できます。

于 2013-07-30T15:07:10.007 に答える
0

このNoReset:=Falseオプションは、フォームがフォーム フィールドのみで開くことを意味します... - つまり、フォームにあったものはすべて削除されます。それがあなたが望むものではない場合は、設定する必要がありますNoReset:=True。

于 2013-02-10T22:10:04.480 に答える
0 
Sub Test2()
If ActiveDocument.ProtectionType = wdNoProtection Then
ActiveDocument.Unprotect
End If

End Sub
于 2014-04-01T05:44:15.957 に答える