Keep Today() date when workbook closed

[tsymic]

I have a work order that I would like to be able to reopen and have the same date as when the work order was written. I'm not sure if I should create a macro, or is there a formula I can use?

I don't want whoever is creating the work order to have to enter the date in the cell. I have today() currently, but if the work order is reopened a week down the road, the date is now wrong. I'm not sure if there is anything I can do.

 

[mumps]

What is the sheet name and cell where today() is entered?

 

[tsymic]

The sheet is saved as the work order number and the today() is entered in the cell below the work order number.

 

[mumps]

Place this macro in the code module for ThisWorkbook. Do the following: Hold down the ALT key and press the F11 key. This will open the Visual Basic Editor. In the left hand pane, double click on "ThisWorkbook". Copy/paste the macro into the empty window that opens up. Close the window to return to your sheet. Save the file as a macro-enabled file, close it and re-open it. If the date in P7 in the "Work Order" sheet does not equal the current date, the formula will be overwritten by the same date as when the work order was written.

Private Sub Workbook_Open()
    If Sheets("Work Order").Range("P7") <> Date Then
        Sheets("Work Order").Range("P7").Value = Sheets("Work Order").Range("P7").Value
    End If
End Sub

 

[tsymic]

Should I put this before or after the macro I already have for everything else going on on this work book? Or does that kind of thing matter?

I really appreciate your help!

 

[mumps]

Follow my instructions in Post #4 to put it in the code module for ThisWorkbook. As long as you don't have any other Workbook_Open macro in the code module for ThisWorkbook, hopefully, it won't create any problem.