macro to close document without saving but password protected

elaineAda · #1 02-01-2023, 06:45 PM

Hi Hi

I have problem writing a code to close a document but with password protected without saving if user does not want to save.

This code is not able to password protect if user decides not to save the file and exit word.

Code:

Private Sub Document_Close()

With ActiveDocument
    If .ProtectionType = wdNoProtection Then
         .Protect wdAllowOnlyReading, NoReset:=True
    Else
        .Unprotect
    End If
End With

gmayor · #2 02-01-2023, 10:07 PM

What you appear to be asking is not possible. If you make any change to the structure of the document, such as adding a password, then if you close the document without saving, any change you make is lost.
Why if the document is supposed to be protected as read only, would the protection have been removed?

gmayor · #3 02-01-2023, 10:26 PM

See your other post for a possible workaround.

elaineAda · #4 02-01-2023, 10:44 PM

Hi
This is not for a form but rather an editable word document.
I am trying to password protect the file, user need to click on 'edit content' to be able to use the file.
It works nicely if user save and exit the document. The file will also be password protected when the user next open the file.
However, if user exit the document without saving the file, the file will become not protected and encounter error message when the user next open the file.
One workaround method is to undo all changes and save the file, but i am not sure how to write the macro for undo changes.
Appreciate your help!
Thanks.

gmayor · #5 02-02-2023, 10:32 PM

Unfortunately I fail to see the logic of what you are doing and your example document doesn't disclose anything useful to aid understanding.

Either the document is editable, in which case the protection would appear superfluous, or only parts of it are editable, in which case marking those parts as editable, or better still using content controls (which are not limited to forms) would seem to make more sense.
If the document is intended to be reused then surely it would be better saved as a template and users create new documents from it, which would preclude the need to clear it between uses as the documents would match the template?

elaineAda · #6 02-02-2023, 10:51 PM

Hi
I am sorry, I think i have not elaborated on my intention.
My intention is to force user to 'enable content' before using the document as this is a macro-embeded document. This document is not a form, it is only a skeleton to help users and users can add in as many sections or graphics as they like. This document will be placed in a sharepoint, user to download this document, complete and send to another user (user 2, user 3 ...) to edit/approve. The use of the document will stop there.

So after user complete and save and close the document, the document should remain as password protected. And when the next user (user2, user 3...) open this file, they will also need to 'enable content' in order to edit the file.

Does this help?

gmayor · #7 02-03-2023, 02:18 AM

From everything you have reported, I cannot see any good reason to have the document protected, if users can change it at will. The 'skeleton' document appears to be a template. Save it as a template and get users to create new documents from it. Then the macro and password would be superfluous.
As I mentioned earlier, you cannot make changes to a document and then retain those changes when you close it without saving it.
Clearing the data and saving it is problematical for a document that allows free editing. You would have to store the original content somewhere that the user has access to and replace the edited version with the stored original. None of this is necessary if you use a template.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Close Document Without Saving Prompt	Joe528	Word	3	10-08-2021 06:12 PM
Looking for ideas for a foolproof password-protected template/document	Sarcas	Word	2	09-11-2019 01:21 AM
VBA Macro to Open password protected Word Documents	gennylk	Word VBA	2	01-11-2018 11:03 PM
Macro to Unprotect password protected document	pooklet	Word	2	12-08-2014 01:32 AM
How to open a password-protected word document?	navalava	Word	1	07-01-2012 12:15 PM