saving files

[mobiltech]

I have a spread sheet that needs daily input but needs to be saved differently for each day. is there a way for me to be able to have it save the entered info as the current date automatically, without changing the current blank spread sheet.
thanks,
John

 

[Dave Hawley]

Hi John

Right click on the Excel Icon, top left next to "File" and paste in this code.


Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.DisplayAlerts = False
Me.SaveAs Format(Date, "ddmmmyyyy")
Application.DisplayAlerts = True
End Sub