marcodevoto
10-30-2007, 02:40 PM
I have the following to save a work book to a specific loc with a cell value & current date used as the file name
Option Explicit
Sub SvMe()
Dim newFile As String, fName As String
fName = Range("A1").Value
newFile = fName & " " & Format$(Date, "mm-dd-yyyy")
ChDir _
"C:\Documents and Settings\ USER NAME \Desktop"
ActiveWorkbook.SaveAs Filename:=newFile
End Sub
But how do i get it to use the range from two cells + date????
Can any one help:banghead:
Option Explicit
Sub SvMe()
Dim newFile As String, fName As String
fName = Range("A1").Value
newFile = fName & " " & Format$(Date, "mm-dd-yyyy")
ChDir _
"C:\Documents and Settings\ USER NAME \Desktop"
ActiveWorkbook.SaveAs Filename:=newFile
End Sub
But how do i get it to use the range from two cells + date????
Can any one help:banghead: