Sleeper: How to save as with fixed name and server location ?

Hello,

I'm currently blocked on this issue :

Code:

---

sFileSaveName = Application.GetSaveAsFilename(InitialFileName:=***, fileFilter:="Excel Files (*.xlsx), *.xlsx")

---

This opens a Save as dialog box, which is fine,
The file name is automatically generated ("***") which is also what I want,

But the default folder is C:/My Documents

This is not what I want. I want a default folder based on a server where the user can chose the folder where he wants to save the file.

Thanks for your help.

Include the path in the

Code:

---

InitialFileName:=

---

I tried something like :

Code:

---

sFileSaveName = Application.GetSaveAsFilename(InitialFileName:="https://server/folder/" & ***, fileFilter:="Excel Files (*.xlsx), *.xlsx")

---

The dialog box opened the right path but in that case didn't put any name

I know that I'm doing a mistake somewhere. So I'm looking for the right code :)

Thanks

This works for me:

Code:

---

sFileSaveName = Application.GetSaveAsFilename(InitialFileName:="C:\blahblah\500 worst Songs\qwerty", fileFilter:="Excel Files (*.xlsx), *.xlsx")

---

as did this:

Code:

---

sFileSaveName = Application.GetSaveAsFilename(InitialFileName:="C:\blahblah\500 worst Songs\qwerty.xlsx", fileFilter:="Excel Files (*.xlsx), *.xlsx")

---

It doesn't work for me.
2 things are important to precise :

In your code the path is a hard drive, in mine it's a web server
In your code the filename is fixed, in mine it's a variable (a unique ID generated from different values)

regarding variables, these all worked:
dddd = "qwerty"

Code:

---

sFileSaveName = Application.GetSaveAsFilename(InitialFileName:="C:\blahblah\500 worst Songs\" & dddd, fileFilter:="Excel Files (*.xlsx), *.xlsx")

---

dddd = "qwerty.xlsx"

Code:

---

sFileSaveName = Application.GetSaveAsFilename(InitialFileName:="C:\blahblah\500 worst Songs\" & dddd, fileFilter:="Excel Files (*.xlsx), *.xlsx")

---

dddd = "C:\blahblah\500 worst Songs\qwerty.xlsx"

Code:

---

sFileSaveName = Application.GetSaveAsFilename(InitialFileName:=dddd, fileFilter:="Excel Files (*.xlsx), *.xlsx")

---

regarding webservers, this is difficult to test; do you know if there's a specific web server available to the public that I can test this on?

Yes you can test with Google Drive or Dropbox...

I'm struggling at the moment; there seem to be a few ways of doing this - Google drive can be mapped to look as if it's local, I guess that's not happening at your end. Can you give me an idea of what's in the this box when you do navigate to the right place:
Attachment 21153

Hi
There are just folders containing different files.
And for information it's a "Microsoft Sharepoint" server.

There seem to be some solutions on the web:
https://answers.microsoft.com/en-us/...661af80?auth=1
https://stackoverflow.com/questions/...amic-file-name
https://sharepoint.stackexchange.com...nt-online-2013
https://www.experts-exchange.com/que...nt-Online.html
https://officeaccelerators.wordpress...point-library/