Hi there



I have a word doc of which I wanna run a macro automatically when it opens. I need it to open the document and then open "my documents " and then a folder within that.

Can this be done.

Hi shreked,

You can do that by adding the following code to the document's 'This Document' module:
Note that the code switches the folder opening path back to the default after the dialogue is closed.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Thanks for that but where do I find "this document" module cos tried creating a macro for it and nothing happens.

Apologies on that Ive found where I gotta find that.

Is there any way that I can get a message box come up saying "please choose template that applies" when it opens up the "open box" to click on what file to open. And being a pain can I close the original document when the 2nd doc opened.

Thanks

Hi shreked,

Alt-F11, look for your document's name in the upper-left panel. Its 'This Document' module will already be there. Open that & paste the code.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Thanks for that

Yes, but you're really not going about this the right way. Be that as it may, add:
MsgBox "Please choose the template that applies"
after:
With Application
Yes, add:
ThisDocument.Close SaveChanges:=False
before:
End Sub

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Thats brill. One other little thing. How do I run a 2nd macro automatically once this ones run.

Private Sub Document_Open()
Dim StrFold As String
With Application
MsgBox "Please choose the template that applies"
StrFold = .Options.DefaultFilePath(wdDocumentsPath)
With .Dialogs(wdDialogFileOpen)
.Name = "\\cr-na2\users\glennm\test \"
.Show
End With

.ChangeFileOpenDirectory StrFold
End Sub

Hi shreked,

Unless that macro is a Document_Open macro or equivalent in the newly-opened document, you can't - it would have to be run before the document containing the above macro closes.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]