AutoCAD Inventor :: Open Word File And Save As From ILogic / VBA?

We have a word file that we use a lot for our drawings.  There is an empty file that we open and then save the file into the same directory as the drawing.

I am trying to setup some code that will open the empty Word File, and then bring up the Word Save As dialog box with the correct directory and file name already completed.  The correct directory and File name will be determined by the Drawing Code.

I have been able to open the Empty Word Document from iLogic with the following
 
'CRS Template Path & File NameoCRSTemplate = "\WWSERVERDisplaysA-Z Stand PartsCRS-Template.doc" 'Publish document. ThisDoc.Launch(oCRSTemplate)
 
I have been able to Open the Empty Word File from VBA and then bring up the Word Save As Dialog Box but I cannot work out how to define the initial directory or the initial file name from Inventor.

This is the VBA Code I have been using top open the Empty Word File and Show the Word Save As Dialog Box:

Public Sub OpenCRSDoc1()
'Don't Forget to Add the Word Object Library in the Tools - References
' Call SetCRSDetails

[Code].....

If you try to use the With Command for the FilePicker it will just open the Word Document and NOT the Save As Dialog Box!!!

Example of the With Tried

With FilePicker
.InitialDirectory = "Z:"
.DialogTitle = "Hello"
.Show
End With

How to open a Word Document from either iLogic or VBA (VBA Preferred) and then open the Word Save As Dilog Box and define the Initial Directory and Filename?