Ho risolto così:

codice:
Private Sub Form_BeforeUpdate(Cancel As Integer)
Me![last_upd] = Date
End Sub
Grazie ancora Misterxxx per la disponibilità.