Dialogue for Save As

[David C]

How [from VB] do I force the default folder in the 'Save As' dialogue to be a
particulr folder; we are changing our corporate servers, and wish to save
all new and edited Word docs to the new server folders, without the faff of
searching to unfamiliar roots and branches on the networks every time, to
find the new server.

Or is there a VB way to open the SaveAs dialogue and prompt with the new
folder?

 

[Helmut Weber]

Hi David,

how about this:

Dim oDlg As Dialog
Set oDlg = Dialogs(wdDialogFileSaveAs)
oDlg.Name = "c:\test\"
oDlg.Show

--
Greetings from Bavaria, Germany

Helmut Weber, MVP WordVBA

Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"

 

[David C]

Thanks - I will try it now.

 

[David C]

Works a treat, thanks

I used oDlg.Name = "c:\test\" & filename to offer a default name too.

Very grateful,
David C