T
tkaplan
I have the following macro written:
Sub SaveFile()
Dim newFileName As String
Dim curMonthName As String
Dim curYear As String
Dim curCenter As String
Dim curCounty As String
curMonthName = MonthName(month(Range("C4")))
curYear = Year(Range("C4"))
curCenter = Range("E1")
curCounty = Range("C1")
newFileName = curMonthName & " " & curYear & " " & curCounty & "
Billing CT" & curCenter
ActiveWorkbook.SaveAs Filename:= _
newFileName, FileFormat:= _
xlNormal, Password:="", WriteResPassword:="",
ReadOnlyRecommended:=False _
, CreateBackup:=False
End Sub
This saves the file with the name that I want it to save as. I would
like to add that the user chooses the location of where the file will
be saved. right now it's just saving to my documents, but i want the
user to be able to change that to where he/she wants.
how would i do this?
THank you.
Sub SaveFile()
Dim newFileName As String
Dim curMonthName As String
Dim curYear As String
Dim curCenter As String
Dim curCounty As String
curMonthName = MonthName(month(Range("C4")))
curYear = Year(Range("C4"))
curCenter = Range("E1")
curCounty = Range("C1")
newFileName = curMonthName & " " & curYear & " " & curCounty & "
Billing CT" & curCenter
ActiveWorkbook.SaveAs Filename:= _
newFileName, FileFormat:= _
xlNormal, Password:="", WriteResPassword:="",
ReadOnlyRecommended:=False _
, CreateBackup:=False
End Sub
This saves the file with the name that I want it to save as. I would
like to add that the user chooses the location of where the file will
be saved. right now it's just saving to my documents, but i want the
user to be able to change that to where he/she wants.
how would i do this?
THank you.