Dynamic Today() in a formula on another cell working but I need it to not change tomorrow or later.

[chill75]

I'm sure this has been answered as I've read similar post on this forum but none matched what I am doing exactly and I need to get this fixed quickly. I apologize if this is a repeat, but I have a simple formula on a cell that when the value of the cell is not longer empty, or an employee started to type characters in the cell, it puts today's date in the next cell on the same sheet. Kind of like auto populating a start date for the employee. The formula is working perfectly but the issue is I do not want the employee to have to do anything to the date manually and I do not want the date to change when the document opened in a few days. Currently when the document is opened again the next day the start dates all change to the next day's date. Is there a way in the formula to mark the value and static once generated or a better way to auto record a date in a field that will not change when reopened? Thank you in advance for any advice you can give.

 

[arthurbr]

One of the ways to insert a timestamp How to Insert a TIMESTAMP in Excel | Formula, VBA + Shortcut + Button

 

[chill75]

Awesome. The third option might do just the trick. Thank you!!

 

[arthurbr]

Most welcome

 

[chill75]

Well I had hope but as of this morning when I opened the document and the dates changed to today's date and did not stay yesterday's date so those did not work it seems.

 

[pedro-egoli]

As an experiment I used the formula "=today()" in A1.
I then copied A1 and Paste Special/value in A1.
The result was that A1 still shows the original date.
Decided to record these actions in a macro (named todaytest) and this is the macro

Sub todaytest()
'
' todaytest Macro
'

'
    ActiveCell.FormulaR1C1 = "=TODAY()"
    Range("A1").Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    ActiveSheet.Paste
    Application.CutCopyMode = False
End Sub

In case it helps you

 

[mahmed1]

As an experiment I used the formula "=today()" in A1.
I then copied A1 and Paste Special/value in A1.
The result was that A1 still shows the original date.
Decided to record these actions in a macro (named todaytest) and this is the macro

Sub todaytest()
'
' todaytest Macro
'

'
    ActiveCell.FormulaR1C1 = "=TODAY()"
    Range("A1").Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    ActiveSheet.Paste
    Application.CutCopyMode = False
End Sub

In case it helps you

Does this help...


Sub todaytest()

Range(“A1”).value = Date

End Sub