saving files

mobiltech · Mar 28th, 2002, 07:43 PM

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 · Mar 28th, 2002, 08:01 PM

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

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Mar 28th, 2002, 07:43 PM	#1
mobiltech New Member Join Date: Mar 2002 Posts: 1	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

Mar 28th, 2002, 08:01 PM	#2
Dave Hawley Banned Join Date: Feb 2002 Posts: 1,582	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