# Last updated fomula for whole column

#### Laurens

##### New Member
Dear all,

In a previous post on this forum a formula for creating a "last updated" cell for a certain range of cells is given. For instance, if cells A1 till A3 change, A4 will display: Last updated on: 22-6-2012.

I've changed the formule (in MVB) myself into the range I need. B3 till BZ3 changes A3 will display the date of today. See formula below.
Private a(1) As Variant
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
a(0) = a(1)
a(1) = Range("b3:bz3").Value
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Integer
If Intersect(Target, Range("b3:bz3")) Is Nothing Then Exit Sub
For i = 1 To UBound(a(0), 1)
If Range("a" & i).Value <> a(0)(i, 1) Then
msg = msg & Date & vbLf
End If
Next
If Len(msg) Then
With Application
.EnableEvents = False
.Undo
Range("a3").Value = msg
.EnableEvents = True
End With
a(1) = Range("b3:bz3").Value
End If
End Sub

Now, here's the question: I want this formule for the whole column. So, if B4 till BZ4 changes, I want A4 to display the date of today, and so on.
What do I have to modify in the formula to achieve that?
I'm looking forward to your responses!

Kind regards,

Laurens

### Excel Facts

Convert text numbers to real numbers
Select a column containing text numbers. Press Alt+D E F to quickly convert text to numbers. Faster than "Convert to Number"

Replies
6
Views
161
Replies
1
Views
130
Replies
1
Views
170
Replies
2
Views
157
Replies
2
Views
116

1,203,069
Messages
6,053,352
Members
444,655
Latest member
didr

### We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.

### Which adblocker are you using?

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

### Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

### Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back