ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Saving a file with a name generated by cell values (https://www.excelbanter.com/excel-programming/309993-saving-file-name-generated-cell-values.html)

analyst

Saving a file with a name generated by cell values
 
Hi,

I'm building a database of customer enquiries. The macro i have writte
extracts data from the user input cells and places them in a hidde
sheet ready for submission to a central database via the templat
wizard.

What I'd like to do is, rather than having users on the network savin
the file as random names, to have some control over the naming proces
so that the customer's name and the date is picked up and turned int
the file name.

I've got as far as choosing the filename with this formula:-

=CONCATENATE(Customer,"_",Date,".xls")

which gives me the name. I also will have a standard path that thi
tags on to on the network.

Please can you tell me how to save the file based on this cell'
value?

Thanks

Analys

--
Message posted from http://www.ExcelForum.com


Tom Ogilvy

Saving a file with a name generated by cell values
 
sPath = "C:\Myfiles\"

thisworkbook.SaveAs sPath & _
thisworkbook.worksheets("Sheet3").Range("A1").Valu e

--
Regards,
Tom Ogilvy


"analyst " wrote in message
...
Hi,

I'm building a database of customer enquiries. The macro i have written
extracts data from the user input cells and places them in a hidden
sheet ready for submission to a central database via the template
wizard.

What I'd like to do is, rather than having users on the network saving
the file as random names, to have some control over the naming process
so that the customer's name and the date is picked up and turned into
the file name.

I've got as far as choosing the filename with this formula:-

=CONCATENATE(Customer,"_",Date,".xls")

which gives me the name. I also will have a standard path that this
tags on to on the network.

Please can you tell me how to save the file based on this cell's
value?

Thanks

Analyst


---
Message posted from http://www.ExcelForum.com/




No Name

Saving a file with a name generated by cell values
 
hi,
tested
Sub Macro3()
Dim doda As Range
Set doda = Range("E6")
Range("E6").FormulaR1C1 = "test_Delete_later"
Workbooks.Add
ActiveWorkbook.SaveAs Filename:="H:\CodeStuff\" & _
doda & ".xls", FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
End Sub

-----Original Message-----
Hi,

I'm building a database of customer enquiries. The macro

i have written
extracts data from the user input cells and places them

in a hidden
sheet ready for submission to a central database via the

template
wizard.

What I'd like to do is, rather than having users on the

network saving
the file as random names, to have some control over the

naming process
so that the customer's name and the date is picked up and

turned into
the file name.

I've got as far as choosing the filename with this

formula:-

=CONCATENATE(Customer,"_",Date,".xls")

which gives me the name. I also will have a standard path

that this
tags on to on the network.

Please can you tell me how to save the file based on this

cell's
value?

Thanks

Analyst


---
Message posted from http://www.ExcelForum.com/

.


djeans

Saving a file with a name generated by cell values
 
I was looking for the exact same info today as well.

Works perfectly.

Thank

--
Message posted from http://www.ExcelForum.com


analyst

Saving a file with a name generated by cell values
 
Thanks - that works great

--
Message posted from http://www.ExcelForum.com


analyst

Saving a file with a name generated by cell values
 
Just one more thing - is there a line of code which can be inserted int
that macro that will prompt the template to send the data to th
database or update the existing record

--
Message posted from http://www.ExcelForum.com



All times are GMT +1. The time now is 12:41 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com