Cell Text in File Name

B

BT Connect

Does anyone know of a way to generate a Save As <file name> from the text
in a cell?

This would be really useful for all sorts of things.

Jeff
 
B

Bob Phillips

Activeworkbook.SaveAs Activesheet.Range("A1").Value

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)
 
S

somethinglikeant

Yes Jeff,

use this all the time, I call them file stamps.

Sub SaveAsCellText()
ActiveWorkbook.SaveAs Filename:="C:\" & Range("A1").Value
End Sub

Hope this helps

somethinglikeant
http://www.excel-ant.co.uk
 
Top