![]() |
Using a cell reference in a filepath
Hello,
The following code saves the active workbook in c:/files ActiveWorkbook.SaveAs "C:\files\" & ActiveWorkbook.Name However, I have two sub folders in c:\files, c:\files\new\ and c:\files\old\ Is it possible to add a cell reference to the end of ActiveWorkbook.SaveAs "C:\files\" so I can type, for example, "old" or "new" in cell A1, and when I save using the above code, excel will save in the appropriate sub folder? I have tried along the lines of: ActiveWorkbook.SaveAs "C:\files\Range("A1")" & ActiveWorkbook.Name but I cannot get it to work. Thanks in advance. Pinda. |
Using a cell reference in a filepath
Close !
ActiveWorkbook.SaveAs "C:\files\Range" & Range("A1").Value & ActiveWorkbook.Name -- HTH RP (remove nothere from the email address if mailing direct) "Pinda" wrote in message ... Hello, The following code saves the active workbook in c:/files ActiveWorkbook.SaveAs "C:\files\" & ActiveWorkbook.Name However, I have two sub folders in c:\files, c:\files\new\ and c:\files\old\ Is it possible to add a cell reference to the end of ActiveWorkbook.SaveAs "C:\files\" so I can type, for example, "old" or "new" in cell A1, and when I save using the above code, excel will save in the appropriate sub folder? I have tried along the lines of: ActiveWorkbook.SaveAs "C:\files\Range("A1")" & ActiveWorkbook.Name but I cannot get it to work. Thanks in advance. Pinda. |
Using a cell reference in a filepath
The code you entered was almost right, this should work
ActiveWorkbook.SaveAs "C:\files\" & Range("A1") & "\" & ActiveWorkbook.Name ---- Sean "Just press the off switch, and go to sleep!" *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! |
Using a cell reference in a filepath
Bob,
Thanks again for the help, but the code you've given does not save the file in the subfolder (old), it just adds "rangeold" to the front of the filename and saves it in c:\files. So if the file is called test.xls, it will now be called rangeoldtest.xls. I want the file to be saved in the subfolder "old" if cell A1 contains the text "old", or the file to be saved in the subfolder "new" if cell A1 contains the text "new" Thanks again, Pinda. "Bob Phillips" wrote: Close ! ActiveWorkbook.SaveAs "C:\files\Range" & Range("A1").Value & ActiveWorkbook.Name -- HTH RP (remove nothere from the email address if mailing direct) "Pinda" wrote in message ... Hello, The following code saves the active workbook in c:/files ActiveWorkbook.SaveAs "C:\files\" & ActiveWorkbook.Name However, I have two sub folders in c:\files, c:\files\new\ and c:\files\old\ Is it possible to add a cell reference to the end of ActiveWorkbook.SaveAs "C:\files\" so I can type, for example, "old" or "new" in cell A1, and when I save using the above code, excel will save in the appropriate sub folder? I have tried along the lines of: ActiveWorkbook.SaveAs "C:\files\Range("A1")" & ActiveWorkbook.Name but I cannot get it to work. Thanks in advance. Pinda. |
Using a cell reference in a filepath
Sorry, I wasn't careful enough, didn't see you hade the Range as well
ActiveWorkbook.SaveAs "C:\files\" & Range("A1").Value & "\" & _ ActiveWorkbook.Name -- HTH RP (remove nothere from the email address if mailing direct) "Pinda" wrote in message ... Bob, Thanks again for the help, but the code you've given does not save the file in the subfolder (old), it just adds "rangeold" to the front of the filename and saves it in c:\files. So if the file is called test.xls, it will now be called rangeoldtest.xls. I want the file to be saved in the subfolder "old" if cell A1 contains the text "old", or the file to be saved in the subfolder "new" if cell A1 contains the text "new" Thanks again, Pinda. "Bob Phillips" wrote: Close ! ActiveWorkbook.SaveAs "C:\files\Range" & Range("A1").Value & ActiveWorkbook.Name -- HTH RP (remove nothere from the email address if mailing direct) "Pinda" wrote in message ... Hello, The following code saves the active workbook in c:/files ActiveWorkbook.SaveAs "C:\files\" & ActiveWorkbook.Name However, I have two sub folders in c:\files, c:\files\new\ and c:\files\old\ Is it possible to add a cell reference to the end of ActiveWorkbook.SaveAs "C:\files\" so I can type, for example, "old" or "new" in cell A1, and when I save using the above code, excel will save in the appropriate sub folder? I have tried along the lines of: ActiveWorkbook.SaveAs "C:\files\Range("A1")" & ActiveWorkbook.Name but I cannot get it to work. Thanks in advance. Pinda. |
Using a cell reference in a filepath
Bob/Sean,
Bob u the man, thanks, I'm learning slowly but surely! Thanks to Sean as wel, In a bit, Pinda "Sean" wrote: The code you entered was almost right, this should work ActiveWorkbook.SaveAs "C:\files\" & Range("A1") & "\" & ActiveWorkbook.Name ---- Sean "Just press the off switch, and go to sleep!" *** Sent via Developersdex http://www.developersdex.com *** Don't just participate in USENET...get rewarded for it! |
All times are GMT +1. The time now is 08:07 AM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com