help finishing "save as" macro

L

Lindsay

I'm a (retarded) novice, need to finish the macro below (2003), to have it
auto enter a filepath, to wit:
G:\Children Probation\programs\CONSUMER ACTIVITY\
at File Name: in the Save As dialog box, and leave the insertion point for
user to complete the file name manually.


Sub templatesopen()
' templatesopen Macro

Documents.Add Template:= _
"G:\Children Probation\programs\CONSUMER ACTIVITY\Consumer
Activity.dot", _
NewTemplate:=False, DocumentType:=0
Dialogs(wdDialogFileSaveAs).Show

End Sub

Very VERY grateful!!!!
 
Top