There's nothing in the code to indicate the filename at all.
Or do you mean renaming the worksheet ?

NickHK
P.S. Is this a .CSV file or a true Excel .xls file ?

"jk" wrote in message
...
I am using a macro to place a timestamp on workbook open and it saves it
at
this time but if i rename the work book, then try to run the macro i
receive
a file not found.

Private Sub Workbook_Open()
Worksheets("Sheet4").Range("I1").Value = Format(Now, "dd mmm yyyy
hh:mm:ss")
End Sub
Sub DateTime()

Worksheets("Sheet4").Range("I1").Value = _
Format(Now, "dd mmm yyyy hh:mm:ss")
End Sub
The above code is what i am using and it works but the renaming of the
file
could be an issue.Is there a work around on this?