using best approach for activecell property

[thread]

hi
i need to build with excel an option to put time signiture after an
update of another cell
the relevant way i need is for every cell that was inputed i need
right a way to put a time signiture in the offset of 1 column,the
problem is that the selectionchange or change function are working
after the information was added or before any inputs made
is it posible to have the information once it was just inputted?

 

[Mike H]

Hi,

I don't follow your coments on when change event code works but this may do
what you want. Right click the sheet tab, view code and paste it in. Works on
Column A so change to suit.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Or IsEmpty(Target) Then Exit Sub
If Not Intersect(Target, Range("A:A")) Is Nothing Then
Application.EnableEvents = False
Target.Offset(, 1).Value = Time
Application.EnableEvents = True
End If
End Sub

Mike

 

[thread]

thank you very much,it realy worked for me....

Hi,

I don't follow your coments on when change event code works but this may do
what you want. Right click the sheet tab, view code and paste it in. Works on
Column A so change to suit.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Or IsEmpty(Target) Then Exit Sub
If Not Intersect(Target, Range("A:A")) Is Nothing Then
Application.EnableEvents = False
    Target.Offset(, 1).Value = Time
Application.EnableEvents = True
End If
End Sub

Mike





-הר××” טקסט מצוטט-