Auto displaying form on opening a template file, dotm from explorer

vba ms-word word-2013
fraz picture fraz · Jun 30, 2014 · Viewed 14.3k times · Source

I have written a form based document generation macro (in VBA) for distribution to a sales team.

For their ease of use, I want to provide a self-contained file which will display the form as soon as the document is opened.

Using AutoOpen I can get the form to display as intended if word is already open and the dotm file is opened within. However, if I double click the file from within explorer, nothing happens and I have to launch the macro manually. I thought AutoExec might allow this but no luck there. I've spent considerable time trying to get this to work through googling etc. but I'm not getting anywhere.

How can I make the form display even when the file is opened with a double click? Is it possible to do this without having to change normal.dotm for each user?

For further background, I am using Word 2013 with macros fully enabled during testing. The dotm file is stored in a trusted location.

I am using a macro to launch the form like this...

Public Sub AutoOpen()
    StartPage.Show
End Sub

I have tried using AutoExec as well to no avail.

Answer

Sean W. picture Sean W. · Jun 30, 2014

In the "generator.dotm" file got to Visual Basic and go in to the "ThisDocument" Microsoft Word Object.

At the top of the Visual Basic Editor select "Document" in the left hand side and then click on "New" on the right hand side. Private Sub Document_New() method will appear for you to be able to edit. Then you can call your userform in there. Similar to:

Private Sub Document_New()

    Dim myForm As UserForm1
    Set myForm = New UserForm1

    myForm.Show

End Sub

Save your Generator.dotm and double click it through Windows explorer and you should get the results that you would like.

Related questions

Return multiple values from a function, sub or type?

So I was wondering, how can I return multiple values from a function, sub or type in VBA? I've got this main sub which is supposed to collect data from several functions, but a function can only return one value …

Read More
Getting char from string at specified index

As stated how to get char from string at specified index in the visual basic? I look through google and these do not work: s(index) , s.Chars(index),s,Characters(index) So how to get char at specified index?

Read More
Read lines from a text file but skip the first two lines

I've got this macro code in Microsoft Office Word 2003 which reads the lines of a text file. The lines each represent a string value that I need to use later in the code. However, the first two lines of the …

Read More