Hello again my friends
Hope all are well.
I was wondering if someone could assist me with. I have a speadsheet which has a macro button assigned, where once clicked it will save that spreadsheet under the date listed in a cell (depicted as NOW()). The sheet saves under the current date at the time of saving (great...) but when I open the sheet, the date is showing as the current day (due to the NOW () reference attached). I was wondering is there of manipulating my code so that the date within a saved spreadsheet will remain as it was the day it was saved? here is the code attached:
Thanks guys![]()
Sub Daily_Save() ' 'Macro created by Ivor 29/06/10 'Designed to save the file daily, under the current date automatically Dim dailytaskfile As String Dim dailytaskpath As String Dim activeextract As String 'activeextract = ActiveWorkbook ActiveWorkbook.Save dailytaskpath = Range("F3").Value dailytaskfile = Range("G3").Value Application.StatusBar = "Saving file ..." ActiveWorkbook.Save 'Reconciliation directory 'ActiveWorkbook.ReadOnlyRecommended = False 'ActiveWorkbook.WritePassword = "" ActiveWorkbook.SaveAs FileName:= _ dailytaskpath & dailytaskfile, FileFormat:= _ xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False End Sub
Ivor![]()











LinkBack URL
About LinkBacks
Register To Reply
Bookmarks