Try this:

Private Sub Worksheet_Change(ByVal target As Range)

If target.Column = 1 Then target.Offset(0, 1).Value = Now()

End Sub

--
Frank

"Do or do not; There is no try"
-Yoda


"Khozema Sherwala" wrote:

Hi,

I am trying to capture the time on the entry of the cell in column A.
Scenario is I enter a person code in cell in A column and in B column I need
a time stamp. I am using now(). It works for one row. but as i proceed to
scan further all the values in column b is getting updated as i am using
now(). I want to capture time stamp for each entry of person code in col A
and then freeze timestamp in col b and proceed. I am trying to get something
like,

A1
3031
B1
10:30 Pm
A2
3032
B2
10:35 PM
and so on...

Any pointer or help here will help me. Thanks in advance.

best regards,