protecting a document

[MM]

hello all,

I am trying to create a button by recording a macro to protect my
document by limiting formatting option. Here is the code when the
macro is recorded. But when I try to run the macro I get errors, here
is the code. Can someone tell me how to fix this? thank you.

Sub ProtectFormatting()

ActiveDocument.protect Password:="anything", NoReset:=False,
Type:=7, _
UseIRM:=False, EnforceStyleLock:=True

End Sub

The error is: "Parameter value is out of acceptable range"

 

[Jean-Guy Marcil]

hello all,

I am trying to create a button by recording a macro to protect my
document by limiting formatting option. Here is the code when the
macro is recorded. But when I try to run the macro I get errors, here
is the code. Can someone tell me how to fix this? thank you.

Sub ProtectFormatting()

ActiveDocument.protect Password:="anything", NoReset:=False,
Type:=7, _
UseIRM:=False, EnforceStyleLock:=True

End Sub

The error is: "Parameter value is out of acceptable range"

The values for "Type:=" range from -1 "WdNoProtection" to 3
"wdAllowOnlyReading".
I guess, from your description, that you need "-1".

 

[Tony Strazzeri]

I find it helpful to use the defined constants whenever I can. They
are more readable and mean you don't have to remember values. You can
look up the constants in the help but they can be automatically listed
for you after you type the ":=" following the parameter name. If
you have "Auto List Members" turned on in the VBA IDE.

If you don't have this turned on already you can do so by ticking/
checking the "Auto List Members" checkbox in the "Tools| Options"
"Editor" tab in the VBA IDE.

The valid protection types are;

WdProtectionType can be one of these WdProtectionType constants.
wdAllowOnlyComments
wdAllowOnlyFormFields
wdAllowOnlyRevisions
wdNoProtection


Hope this helps.

Cheers
TonyS.