View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Mike Mike is offline
external usenet poster
 
Posts: 3,101
Default Time Stamping Cells

Right click the sheet tab and paste this code in.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 1 Then Exit Sub
Target.Offset(, 1) = Time
End Sub

Any data entered into column A will be time stamped in Col B and the date
will not change.

Mike

"Time" wrote:

So I was given this formula from this online help (very grateful by the way,
thanks for the help!!):

=IF(A1="","", IF(B1="", NOW(), B1))

But the thing is, it is a shared workbook. So when I hit save on my
computer, it does not reflect the time that "cell A1" was originally entered,
but rather the time it showed up "updated" on my computer. How can I prevent
this from happening? Would it be easier to put in the worksheet_change event
that I've been reading about on this site? Whichever is simpler will do.
Thanks for all the help everyone.