Change directory back to "My Documents" after save as 1

[GPM4663]

Hi Everyone,
I have a spreadsheet that many users use that saves and emails automatically when a button is click. I use the following to save a copy of the spreadsheet:

ActiveWorkbook.SaveAs ("C:\FD " & strDate & " " & strDepot)

But I've noticed that afterwards if i open a new spreadsheet and go to save it it still defaults to the folder above instead of changing back to "My documents" Is there anyway I can rectify this?

Many thanks

GPM

 

[combo]

Change path after save:

ChDrive "MyDocsDrive" ' you need this if active drive is different from drive with 'My documents'
ChDir Application.DefaultFilePath ' uses excel default path

combo

 

[GPM4663]

Thanks Combo,

Works a treat!

GPM