ActiveWorkbook.SaveAs Filename:="C:\" & Sheet1!Cells(1, 2) & "_" &
Sheet2!Cells(2, 1)

--
HTH

ijb

Remove nospam from my e-mail address to talk direct

Not MCSD just experienced

"dayton" wrote in message
...
I have a macro that takes a .csv file and puts certain date into specific
sheets.
Can I have the macro save and name the spreadsheet with the value of
specific cells?

Example:
Sheet1 Cell B2 = 802922
Sheet2 Cell A2 = 0589513

I want to save it with the name:
802922_0589513

with the underscore

T.I.A.
Dayton