Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Filename macro and a little more?
The following works for me:
Sub SaveAuto() Dim fname Dim fpath fpath = "C:\Documents and Settings\Ken\Desktop\" fname = Format(Now, "MDD_hhmm") ActiveWorkbook.SaveAs fpath & fname End Sub But in addition to the result of the date code, I would like the filename result to contain a prefix using the contents of a partcular cell of the original workbook (3 letters that represents a customer code) which would allow us to sort the files saved by customer in the saved directory. Can this be done |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Filename macro and a little more?
Sub SaveAuto()
Dim fname Dim fpath Dim Prefix Prefix = Range("A1") fpath = "C:\Documents and Settings\Ken\Desktop\" fname = Format(Now, "MDD_hhmm") ActiveWorkbook.SaveAs fpath & Prefix & fname End Sub "kennected" wrote: The following works for me: Sub SaveAuto() Dim fname Dim fpath fpath = "C:\Documents and Settings\Ken\Desktop\" fname = Format(Now, "MDD_hhmm") ActiveWorkbook.SaveAs fpath & fname End Sub But in addition to the result of the date code, I would like the filename result to contain a prefix using the contents of a partcular cell of the original workbook (3 letters that represents a customer code) which would allow us to sort the files saved by customer in the saved directory. Can this be done |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Filename macro and a little more?
something like:
Sub SaveAuto() Dim fname Dim fpath Dim fprefix as string fprefix = sheets("sheetname").cells(rownumber,columnnumber). value fpath = "C:\Documents and Settings\Ken\Desktop\" fname = fprefix & "_" & Format(Now, "MDD_hhmm") ActiveWorkbook.SaveAs fpath & fname End Sub "kennected" wrote in message ... The following works for me: Sub SaveAuto() Dim fname Dim fpath fpath = "C:\Documents and Settings\Ken\Desktop\" fname = Format(Now, "MDD_hhmm") ActiveWorkbook.SaveAs fpath & fname End Sub But in addition to the result of the date code, I would like the filename result to contain a prefix using the contents of a partcular cell of the original workbook (3 letters that represents a customer code) which would allow us to sort the files saved by customer in the saved directory. Can this be done |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Filename macro and a little more?
Yesterday's response didn't work, huh?
kennected wrote: The following works for me: Sub SaveAuto() Dim fname Dim fpath fpath = "C:\Documents and Settings\Ken\Desktop\" fname = Format(Now, "MDD_hhmm") ActiveWorkbook.SaveAs fpath & fname End Sub But in addition to the result of the date code, I would like the filename result to contain a prefix using the contents of a partcular cell of the original workbook (3 letters that represents a customer code) which would allow us to sort the files saved by customer in the saved directory. Can this be done -- Dave Peterson |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Filename macro and a little more?
You guys are awesome! Thanks a million. Works great. I just wish I had
more time to learn some of this. It took me about 10 years to bet the basics in formula writing down. P.S. Sorry Dave, just figured out how to navigate the groups and hadn't realized you had responded. Didn't get an email the way I thought I would have. "kennected" wrote: The following works for me: Sub SaveAuto() Dim fname Dim fpath fpath = "C:\Documents and Settings\Ken\Desktop\" fname = Format(Now, "MDD_hhmm") ActiveWorkbook.SaveAs fpath & fname End Sub But in addition to the result of the date code, I would like the filename result to contain a prefix using the contents of a partcular cell of the original workbook (3 letters that represents a customer code) which would allow us to sort the files saved by customer in the saved directory. Can this be done |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Change Filename in Macro | Excel Discussion (Misc queries) | |||
Coding a filename into a macro | Excel Programming | |||
Appending Filename in Macro | Excel Programming | |||
filename in macro | Excel Discussion (Misc queries) | |||
Put Filename Variable in Macro | Excel Discussion (Misc queries) |