» Creating Date and Time Stamp
CATEGORY - Excel Date & Time Formulas
VERSION - All Microsoft Excel Versions
Creating a timestamp for each of the values in List1 (column A).
We want the timestamp to display the date and time that each value was entered or when it was most recently modified.
Solution:
1. Go to Tools Options Calculation Tab Check the Iteration checkbox.
2. Use the IF and NOW functions as shown in the following formula:
=IF(A2=",",IF(B2="",NOW(),B2))
3. Apply "mm/dd/yyyy hh:mm" format to column B.
Book Store:
Recommended Books:
- Microsoft Word Version 2002 Step By Step (With CD-ROM)
- Microsoft Windows XP Step by Step (With CD-ROM)
- The 11 Immutable Laws of Internet Branding
- Learn MS Excel 2002 VBA/XML Programming
- Millionaire Real Estate Mentor : The Secrets of Financial Freedom through Real Estate Investing
- Financial Statements: A Step-By-Step Guide to Understanding and Creating Financial Reports
Mechanical Engineer
ottav
I've programmed a timestamp to update when the list has changed, but how do you stop the timestamp from updating when the file is opened. I only want it to change when someone has changed my inventory list.
Thanks,
Danielle
Incomplete formula
Whnke
The formula should read
=IF(A2=",",IF(B2="",NOW(),B2),NOW())
Correction
Whnke
=IF(A2=A2,NOW(),B2)
Is the correct formula
Easy method
Simply type the now function somewhere on the spreadsheet. =Now()
Then go to Data > validation and
Under Allow: = list
Under Source: = "the cell you typed the now formula"
This will allow you to do a "timestamp" function and make it stick!
Later
Validation works....
Faisal
The validation method worked for me. However, it would be much better if it didnt rely on selecting from the drop down list, but instead captured the time/date when text was entered into the adjacent cell....
'Target.Font.ColorIndex = 5
Dim ProdCode, Flag
Flag = 0
'Dim Val As Range
ProdCode = Left(Target, 4)
Select Case ProdCode
Case "99YT"
Target.Offset(0, 1) = "T640-E MMB"
Flag = 1
Case "804E"
Target.Offset(0, 1) = "T640-FPC1-E"
Flag = 1
Case "ST32"
Target.Offset(0, 1) = "M320-FPC3"
Flag = 1
Case Else
End Select
If (Flag = 1 And Target.Offset(0, 4) = "") Then
Target.Offset(0, 4) = Date
End If
End Sub
// I used "Flag" to flag me when the cell is entered
//and I also insured that the date cell is empty
//Enjoy