Question on FileClose Routine

[Montana DOJ Help Desk]

Word 2000

I have the following routine:

Sub FileClose()

CommandBars("Locates").Visible = False
CheckRequiredBookmarks
ActiveDocument.Close (wdSaveChanges)

End Sub

This will run when the user selects File > Close, or clicks the "x" to close
the document, but not when ALT+F4 is used or when the user closes Word. Is
there a way to make this routine run anytime the user takes an action that
causes the document to be closed?

-- Tom

State of Montana
Department of Justice Help Desk

"Making the world a safer place."

 

[Helmut Weber]

Hi Tom,
Sub Autoexit()
MsgBox "autoexit" ' or whatever
Application.Quit
End Sub

 

[JB]

Word 2000

I have the following routine:

Sub FileClose()

CommandBars("Locates").Visible = False
CheckRequiredBookmarks
ActiveDocument.Close (wdSaveChanges)

End Sub

This will run when the user selects File > Close, or clicks the "x" to close
the document, but not when ALT+F4 is used or when the user closes Word. Is
there a way to make this routine run anytime the user takes an action that
causes the document to be closed?

-- Tom

State of Montana
Department of Justice Help Desk

"Making the world a safer place."

Also have a look at this article

J

 

[JB]

Also have a look at this article

J

OOPS Forgot to paste article

http://word.mvps.org/faqs/macrosvba/AppClassEvents.htm

J

 

[Montana DOJ Help Desk]

Helmut,

Thanks for the suggestion. I should have thought about that, seeing as how
I've written auto macros before, and my current project includes an AutoOpen
macro, but it just didn't occur to me.

It appears that AutoExit won't do what I want, so I ended up using
AutoClose, which works even when Word is terminated by ending the task in
Task Manager.

--

State of Montana
Department of Justice Help Desk

"Making the world a safer place."