Problems with ChDrive and ChDir

  • Thread starter Thread starter Sophie
  • Start date Start date
S

Sophie

Hello Everyone?

Raised this last week, but wasn't as precise as this.
Open works below, but not SaveAs, does anyone else get
the same result or know why?

TIA

Sxx


Sub FileOpenDirectory()
ChDrive "C"
ChDir "C:\1"
Application.Dialogs(xlDialogOpen).Show

End Sub
Sub FileSaveAsDirectory()

ChDrive "C"
ChDir "C:\1"
Application.Dialogs(xlDialogSaveAs).Show

End Sub
 
Sophie,

As I said last week, I have tested your code with the same directories, and
it works for me.

What is the directory when you start, and what error do you get?

--

HTH

RP
(remove nothere from the email address if mailing direct)
 
Hi Bob

It's very strange
I Don't get an error at all
But when I run SaveAs the directory that I see is the one
that I last saved too. The code has no effect
Tested it at home and got the same result, I presume
there's some issue with different systems or versions, I
hoped that someone might have solved this in the past.

Weird eh

S
 
What OS and XL version do you have?

--

HTH

RP
(remove nothere from the email address if mailing direct)
 
Back
Top