list the changed cell data.

Copper Contributor
Hi, I want him to save it when the cell contents change.

As an example
Suppose cell B12 has changed its contents 5 times in 1 hour. These variables(1,2,3,4,5)

What I want is cell A1 on Page2;
1
2
3
4
5
and then I want to print the registration date in Cell A2
I'm waiting for your help. thanks
1 Reply

@osdogru 

I'd do it like this:

Right-click the sheet tab.

Select 'View Code' from the context menu.

Copy the following code into the code window:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim rng As Range
    If Not Intersect(Range("B12"), Target) Is Nothing Then
        With Worksheets("Sheet2")
            Set rng = .Range("B" & .Rows.Count).End(xlUp).Offset(1)
        End With
        rng.Offset(0, -1).Value = Range("B12").Value
        rng.Value = Now
    End If
End Sub

Switch back to Excel.

Save the workbook as a macro-enabled workbook.

Make sure that you allow macros when you open it.