Office & Productivity Software forum

General discussion

MS Word 2003 Error

by magicscreen / December 13, 2006 2:41 AM PST

This is my code in a MS Word 2003 Macro.

I can unprotect the MS Word document but when I click the button a second time, first I get a Protection dialog box with the Forms radio button grayed out. I am not using any password and when I click the OK button, I get the message: "The ToolsProtectDocument statement is currently disabled". I could not find anything anywhere on the internet regarding this problem.

Is there any way I can enable it?

Any help would be greatly appreciated.

asterling@nj.rr.com

' Protect and unprotect document
Dim oDoc As Document
Set oDoc = ActiveDocument

On Error GoTo ErrMess
If oDoc.ProtectionType = wdNoProtection Then
oDoc.Protect Type:=wdAllowOnlyFormFields, noreset:=True
Else
oDoc.Unprotect
End If
Exit Sub
ErrMess:
MsgBox Err.Description, vbInformation
Exit Sub

Discussion is locked
You are posting a reply to: MS Word 2003 Error
The posting of advertisements, profanity, or personal attacks is prohibited. Please refer to our CNET Forums policies for details. All submitted content is subject to our Terms of Use.
Track this discussion and email me when there are updates

If you're asking for technical help, please be sure to include all your system info, including operating system, model number, and any other specifics related to the problem. Also please exercise your best judgment when posting in the forums--revealing personal information such as your e-mail address, telephone number, and address is not recommended.

You are reporting the following post: MS Word 2003 Error
This post has been flagged and will be reviewed by our staff. Thank you for helping us maintain CNET's great community.
Sorry, there was a problem flagging this post. Please try again now or at a later time.
If you believe this post is offensive or violates the CNET Forums' Usage policies, you can report it below (this will not automatically remove the post). Once reported, our moderators will be notified and the post will be reviewed.
Popular Forums
icon
Computer Newbies 10,686 discussions
icon
Computer Help 54,365 discussions
icon
Laptops 21,181 discussions
icon
Networking & Wireless 16,313 discussions
icon
Phones 17,137 discussions
icon
Security 31,287 discussions
icon
TVs & Home Theaters 22,101 discussions
icon
Windows 7 8,164 discussions
icon
Windows 10 2,657 discussions

GIVEAWAY

We are giving away 'Black Panther' swag!

Four lucky readers will be taking home *Marvel*ous "Black Panther" prizes, including magazines autographed by the King of Wakanda himself! Giveaway ends Feb. 25, 2018.