timestamp (please help)

  • Thread starter Thread starter cape
  • Start date Start date
C

cape

I am using the following timestamp code. The row it references ha
formulas in it. So when a change occures it does not update th
timestamp Thanks in advance

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Target
If .Count > 1 Then Exit Sub
If Not Intersect(Range("A5:AB272"), .Cells) Is Nothing Then
Application.EnableEvents = False
If Not IsEmpty(.Value) Then
me.range("b3")=now
End If
Application.EnableEvents = True
End If
End With
End Su
 
I am using the following timestamp code. The row it references has
formulas in it. So when a change occures it does not update the
timestamp Thanks in advance
Click to expand...

OK, half the code you posted just fell over for me. But I did get some joy
with plain

Private Sub Worksheet_Calculate()
'NB "Calculate"
Me.Range("B3") = Now
End Sub

HTH,
Andy
 
Hello Cape from Steved

I also use the below stamp in fact I have it in over 500
files and works perfect.

Remmeber b3 is where you will see the timestamp in my case
I have it as a date, so each file that is updated the date
changes in b3 to reflect this.

Do not format b3

So here is what I would like you do do,
Start excel, with the new worksheet in front of you paste
in the code (Alt F11), immediately you should see
something in cell b3, now go and format it to what you
require.

Cheers.
 
Back
Top