Tijds stempel bij verandering.

[Dokman]

Hallo,

Ik ben op zoek naar het volgende.
Als ik iets verandert in Cel A2, B2, C2, D2, E2, F2, G2, H2 dan zou ik graag willen dat de datum van vandaag in cel I2 komt te staan.
Verander ik wat in A3, B3, C3, D3, E3, F3, G3, H3 dan zou er en datum in cel I3 moeten komen. van wanneer ik een van die cellen heb verandert.

En dat gaat door tot rij 250

 

[edmoor]

Zie:
https://learn.microsoft.com/en-us/office/vba/api/excel.worksheet.change

Of plaats een voorbeeld documentje.

 

[AHulpje]

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A2:H3")) Is Nothing Then
        Cells(Target.Row, 9) = Now()
    End If
End Sub