I need to create code to bring up a dialog box to SAVE AS
in a specific directory but allow the user to type in
their own filename.

Here is what I have and it doesn't work.

ChDrive "N"
ChDir "N:\GROUP\RESID BILLING TEAM\Res Billing Reps\"

Application.Dialogs(xlDialogSaveAs).Show

I've also tried this and doesn't work.

ChDrive "N"
Application.Dialogs
(xlDialogSaveAs).Show "N:\GROUP\RESID BILLING TEAM\Res
Billing Reps\")

HELP..Thanks in advance.

I can't explain it.

--
Regards,
Tom Ogilvy

"Jules" wrote in message
...
When I put a message box after chdir and receive F:\my
documents instead of a directory.
???? The only changes are Office SP3 and Netware cluster..
-----Original Message-----
ChDrive "N"
ChDir "N:\GROUP\RESID BILLING TEAM\Res Billing Reps\"

Application.Dialogs(xlDialogSaveAs).Show
' or fname = Application.GetOpenFileName()

works for everyone else. Why do you think it isn't
working for you. Is the
directory spelled correctly.
What do you mean it doesn't work?

the saveas dialog opens in the current directory. the
commands above should
make the the current directory. Before you show the
dialog, put up a
message box

msgbox curdir

See where you are.

If it doesn't work, then perhaps there is some network
permissions problem
that prevents it.

--
Regards,
Tom Ogilvy


Jules wrote in message
...
I need to create code to bring up a dialog box to SAVE
AS
in a specific directory but allow the user to type in
their own filename.

Here is what I have and it doesn't work.

ChDrive "N"
ChDir "N:\GROUP\RESID BILLING TEAM\Res Billing
Reps\"

Application.Dialogs(xlDialogSaveAs).Show

I've also tried this and doesn't work.

ChDrive "N"
Application.Dialogs
(xlDialogSaveAs).Show "N:\GROUP\RESID BILLING TEAM\Res
Billing Reps\")

HELP..Thanks in advance.


.