Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to open SaveAs... and change filename to cell value
I have an excel.xlt file that I would like to fill in and save as an .xls with its filename and path based on particular cell values
For example A1 = Company A2 = QuoteNumber The full Path/filename I would like to SaveAs... is R:\Company\QuoteNumber.xls I would appreciate if any could suggest a macro code to do this:) |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to open SaveAs... and change filename to cell value
Hi Andy
something along the lines of Dim fname As String fname = "R:\" & Range("A1").Value & "\" & Range("A2").Value & ".xls" ActiveWorkbook.SaveAs fname this assumes that the folder for the company exists Cheers JulieD "Andy" wrote in message ... I have an excel.xlt file that I would like to fill in and save as an .xls with its filename and path based on particular cell values For example A1 = Company A2 = QuoteNumber The full Path/filename I would like to SaveAs... is R:\Company\QuoteNumber.xls I would appreciate if any could suggest a macro code to do this:) |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to open SaveAs... and change filename to cell value
Thanks Julie
It did exactly what I wanted in terms of the file saving. Thankyou. What it didn't do was also change the name of the .xlt I was working on. Yes, the file was saved as the correct name however as I would like to keep working on it without opening the correctname.xls. "JulieD" wrote: Hi Andy something along the lines of Dim fname As String fname = "R:\" & Range("A1").Value & "\" & Range("A2").Value & ".xls" ActiveWorkbook.SaveAs fname this assumes that the folder for the company exists Cheers JulieD "Andy" wrote in message ... I have an excel.xlt file that I would like to fill in and save as an .xls with its filename and path based on particular cell values For example A1 = Company A2 = QuoteNumber The full Path/filename I would like to SaveAs... is R:\Company\QuoteNumber.xls I would appreciate if any could suggest a macro code to do this:) |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to open SaveAs... and change filename to cell value
"JulieD" wrote: Hi Andy something along the lines of Dim fname As String fname = "R:\" & Range("A1").Value & "\" & Range("A2").Value & ".xls" ActiveWorkbook.SaveAs fname this assumes that the folder for the company exists Cheers JulieD "Andy" wrote in message ... I have an excel.xlt file that I would like to fill in and save as an .xls with its filename and path based on particular cell values For example A1 = Company A2 = QuoteNumber The full Path/filename I would like to SaveAs... is R:\Company\QuoteNumber.xls I would appreciate if any could suggest a macro code to do this:) |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to open SaveAs... and change filename to cell value
Hi Julie
Thankyou very much. The file save worked well however I wanted to continue working on the new saved as file straight away and had to open the file manually. When I normally Save As... manually the .xlt I am working on turns into a .xls that I rename and relocate and I continue to work on the .xls. Is there something I have forgotten? "JulieD" wrote: Hi Andy something along the lines of Dim fname As String fname = "R:\" & Range("A1").Value & "\" & Range("A2").Value & ".xls" ActiveWorkbook.SaveAs fname this assumes that the folder for the company exists Cheers JulieD "Andy" wrote in message ... I have an excel.xlt file that I would like to fill in and save as an .xls with its filename and path based on particular cell values For example A1 = Company A2 = QuoteNumber The full Path/filename I would like to SaveAs... is R:\Company\QuoteNumber.xls I would appreciate if any could suggest a macro code to do this:) |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to open SaveAs... and change filename to cell value
Hi Andy
i don't quite understand this, when i run the code the xlt turns into the newly saved file (as shown in the title bar at the top) ... this is whether i open the template itself or whether i open a new workbook based on the template. how are you running the code? could you cut & paste everything from the sub to the end sub -also are you opening the xlt or a new workbook based on the xlt (file / new - templates from my computer etc) what version of excel are you running? Cheers JulieD "Andy" wrote in message ... Hi Julie Thankyou very much. The file save worked well however I wanted to continue working on the new saved as file straight away and had to open the file manually. When I normally Save As... manually the .xlt I am working on turns into a ..xls that I rename and relocate and I continue to work on the .xls. Is there something I have forgotten? "JulieD" wrote: Hi Andy something along the lines of Dim fname As String fname = "R:\" & Range("A1").Value & "\" & Range("A2").Value & ".xls" ActiveWorkbook.SaveAs fname this assumes that the folder for the company exists Cheers JulieD "Andy" wrote in message ... I have an excel.xlt file that I would like to fill in and save as an ..xls with its filename and path based on particular cell values For example A1 = Company A2 = QuoteNumber The full Path/filename I would like to SaveAs... is R:\Company\QuoteNumber.xls I would appreciate if any could suggest a macro code to do this:) |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
SaveAs Filename and FileFormat in Vs2007 | Excel Discussion (Misc queries) | |||
SaveAs using two cells for filename | Excel Discussion (Misc queries) | |||
Max charactors for 'ActiveWorkbook.SaveAs Filename'? | Excel Worksheet Functions | |||
SaveAs Filename Help | Excel Programming | |||
Can a MACRO prompt for the filename to open and/or save? | Excel Programming |