Set Macro so it runs when other open the Word Document

gmayor · #2 01-25-2021, 05:47 AM

In order to run when the document is opened, the macro needs to be renamed AutoOpen and the document should be saved as macro enabled. However you cannot force the user to run the macro.

Code:

Sub AutoOpen()
Const strPassword As String = "password"
    With ActiveDocument
        If Not .ProtectionType = wdNoProtection Then
            .Unprotect Password:=strPassword
        End If
        .Revisions.AcceptAll
        .Protect Password:=strPassword, _
                 NoReset:=False, _
                 Type:=wdAllowOnlyReading, _
                 UseIRM:=False, _
                 EnforceStyleLock:=False
    End With
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
MS WORD search macro slows way down as it runs	Chopper	Word VBA	8	12-21-2020 03:49 PM
[Word VBA macro] How to open the website [languagetool.org] and check my Word document?	citroen	Word VBA	0	10-25-2020 05:07 AM
Creating a macro from a non-saved Word doc that duplicates the current open document and saves it	mike0215	Word VBA	3	11-17-2017 01:40 PM
Macro to Open to a Website When No Document Is Open	lostinwebspace	Word VBA	1	02-13-2016 10:28 AM
VB code from one document runs on other open documents	beav_35	Word VBA	0	11-10-2010 02:52 PM