Follow the changes in cell

C

Comfy

Well-known Member

Joined

Dec 21, 2009

Messages

3,386

• Aug 22, 2014

• #2

Which cell would you need this to work for (Is it a single cell or a whole column)?

Where would you like the date/time to be placed?

 

Upvote 0

shimaa01234

Active Member

Joined

Jun 24, 2014

Messages

446

• Aug 22, 2014

• #3

Possible column "A" from A1: A10

 

Upvote 0

C

Comfy

Well-known Member

Joined

Dec 21, 2009

Messages

3,386

• Aug 22, 2014

• #4

shimaa01234 said:

Possible column "A" from A1: A10

Click to expand...

So if any cell is amended in the Range A1:A10 you want a time stamp added to the worksheet.

Where will the time stamp appear?

 

Upvote 0

shimaa01234

Active Member

Joined

Jun 24, 2014

Messages

446

• Aug 22, 2014

• #5

Possible in the "comments", appears next to the cell

 

Upvote 0

C

Comfy

Well-known Member

Joined

Dec 21, 2009

Messages

3,386

• Aug 22, 2014

• #6

Paste this code into the worksheet object that you wish it to run, do not add it to a standard module:

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Target.Worksheet.Range("A1:A10")) Is Nothing Then
        Target.Offset(, 1).Value = Format(Now(), "dd/mm/yy hh:mm:ss")
    End If
End Sub

 

Upvote 0

shimaa01234

Active Member

Joined

Jun 24, 2014

Messages

446

• Aug 22, 2014

• #7

Wonderful, but I want to "date and time" appear in the "Comment"
And not in the adjacent cell

-- removed inline image ---

 

Last edited: Aug 22, 2014

Upvote 0

C

Comfy

Well-known Member

Joined

Dec 21, 2009

Messages

3,386

• Aug 22, 2014

• #8

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Target.Worksheet.Range("A1:A10")) Is Nothing Then
        If Not Target.Comment Is Nothing Then
        Target.Comment.Text Format(Now(), "dd/mm/yy hh:mm:ss")
        Else
        Target.AddComment Format(Now(), "dd/mm/yy hh:mm:ss")
        End If
    End If
End Sub

 

Upvote 0

shimaa01234

Active Member

Joined

Jun 24, 2014

Messages

446

• Aug 22, 2014

• #9

a wonderful ,Code
Thank you very much Mr. " Comfy"
But I have a last Request
Can you control the display of "commentary"

 

Upvote 0

C

Comfy

Well-known Member

Joined

Dec 21, 2009

Messages

3,386

• Aug 22, 2014

• #10

shimaa01234 said:

Can you control the display of "commentary"

Click to expand...

Control How?

What do you need?

 

Upvote 0