I'm trying to save a excel form (populated from Access)
to another folder.
My regular code is:
'================================
FileStr = fso.getparentfoldername(Access.CurrentDb.Name) & "\Trans" & "-" & CompName & "-" & Draftval & "-" & Format(Date, "mmddyy") & "-" & TIDNo

xlDoc.SaveAs FileStr
'================================
This will save to the current database location.
If modified this to save into a new folder location:
'================================

FileStr = fso.getparentfoldername("N:\TransLog") & "\Trans" & "-" & CompName & "-" & Draftval & "-" & Format(Date, "mmddyy") & "-" & TIDNo
xlDoc.SaveAs FileStr

'==================================
This was to save into the folder "N:\translog"
as the file name listed.
Problem, it is still saving in the original folder location.
Can anyone help with the correct code solution?
Thanks

John Paul

__________________
John Paul

I have found the answer,
Code:
xlDoc.SaveAs ("N:\Forms") & "\Trans" & "-" & TIDNo

I didn't need to use the FSO.getparentfolder in this case.



Thanks

John Paul

Great you found the answer. Hey, just a suggestion since I see you're using the date in your file name. Instead of Format(Date, "mmddyy"), consider Format(Date, "yyyymmdd").

1) Is it Y2K compliant (many IT depts. will not accept two-year digits in anything now).

2) When you use File Manager or Windows Explorer and sort by file name, the file names will sort by year, then month, then day properly. In the other way, they'll sort by month then day then year. Not a typically desired sort. You'll end up with all Januarys for X years first, then all Februarys, etc. instead of one year first then by its months and days, then the next year, etc.


Greg Serrano
Michigan Dept. of Environmental Quality, Air Quality Division