Hi Kim
If you only want the behavior when you close the last open document, use this instead
If Documents.Count = 1 And ActiveDocument.Range.Characters.Count > 1 The
Documents.Ad
End I
-- Andre
----- Andrew Savikas wrote: ----
Hi Kim
Not knowing your particular needs, this should get you started
(1) Go to Tools->Macro->Macros, in the box "Macros In" choose "Normal.dot" (or the template for which you want this behavior).
(2) In the "Macro Name" box, enter: AutoClos
(3) Press Create
The VBA editor will launch, and you'll be presented with something like this
----------------------
Sub AutoClose(
' AutoClose Macr
' Macro created 5/5/2004 by Ki
End Su
--------------------
Put your cursor in the line above "End Sub", and enter this
If ActiveDocument.Range.Characters.Count > 1 The
Documents.Ad
End I
Go to File->Save, then go to File->Close And Return to Wor
From here on out you'll get a new blank document when you close any document. If the last document you close is blank (except for the omnipresent paragraph mark), Word will remain open with no documents
This means that exiting Word will become a two-step process, though it sounds like you're willing to make the trade-off so that opening a new blank document is a one-step process
HTH
Andrew Savikas