Below is what I get from
Code:
sDestPath = Application.GetSaveAsFilename(, , , Title:="Set destination dir")
I apologize, I thought and incorrectly said that the command to do this was .SaveAs, but it was .GetSaveAsFilename. Thank you for your patience.