![]() |
|
#1
|
||||
|
||||
![]()
Hi tinfanide,
Try: Code:
Sub saveFile() Dim Strfold As String, StrNewFile As String, StrfName As String StrfName = "test" Strfold = "C:\Users\Tin\Desktop\" StrNewFile = Strfold & fName & " " & Format$(Date, "yyyy-mm-dd") ActiveWorkbook.SaveAs FileName:=StrNewFile End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
![]() |
|