Code Snippet "VBA Access"

Mutationsdatum bei Änderungen in Formular automatisch aktualisieren

Bedingung: Haupttabelle hinter Formular besitzt ein Feld namens "Mutationsdatum"

Aufruf
Ereignis "Vor Aktualisierung" des Formulars
=funMutationsdatum([mutationsdatum])

Code in modcommonproc:
'Aktualisiert Mutationsdatum in diversen Formularen
Public Function funMutationsdatum(ByRef objctr)
  objctr.Value = Now()
End Function