Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 1
Default Timestamping a cell with a Link already attached to it.

I have cells "C9:C100" all of them have a value linked from a different
cell on a different Sheet, within the same Workbook.

EX:

C9 in worksheet A is linked to D12 in worksheet B. If there is any
changes done to D12 in worksheet B it shows in realtime on C9 in
worksheet A, but I want a time stamp to show the change on D9 in
worksheet A.

I found the following Macro and it works great, but it will not update
the timestamp when the link is changed. It just keeps the original
timestamp.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
With Target
If .Count 1 Then Exit Sub
If Not Intersect(Range("D2:D3000"), .Cells) Is Nothing Then
Application.EnableEvents = False
If IsEmpty(.Value) Then
.Offset(0, 1).ClearContents
Else
With .Offset(0, 1)
.NumberFormat = "mmm dd yyyy hh:mm:ss"
.Value = Now
End With
End If
Application.EnableEvents = True
End If
End With
End Sub

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Help with this conditional IF statement C-Dawg Excel Discussion (Misc queries) 3 May 15th 06 06:01 PM
Urgent date/scheduling calc needed jct Excel Worksheet Functions 3 February 24th 06 01:36 AM
Link to Cell Not Updating Jason Excel Worksheet Functions 3 December 19th 05 03:37 AM
hyperlink - link one cell to another in a worksheet. how? Drewz Excel Worksheet Functions 1 October 20th 05 04:09 PM
GET.CELL Biff Excel Worksheet Functions 2 November 24th 04 07:16 PM


All times are GMT +1. The time now is 03:25 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"