Access-Makro zum Alter berechnen

[antifa2004]

Hallo ihr,

folgendes Problem hab ich:

In einem Access-Formular habe ich ein Textfeld, in dem das Geburtsdatum steht. In einem weiteren Textfeld soll nach Aktualisierung des Geburtstagsfeldes das Alter errechnet werden.
Als Ereignis habe ich "Nach Aktualisieren" gewählt und ein Makro erzeugt.

Aktion ist "Setzen Wert"
Feld ist "[Formulare]![Personalverwaltung]![Alter]"
Ausdruck ist "(Datum()-[Formulare]![Personalverwaltung]![Geburtsdatum])/365"

Funktioniert leider ziemlich ungenau. Wenn der Geburtstag ran ist, ist man leider nie genau das richtige Jahr. Also Beispiel: 3.4.83 Geburtstag - errechnetes Alter: 26,12345646.

Kann mir jemand weiterhelfen? Wäre wirklich klasse.

Besten Dank!

 

[KönnerGönner]

Kann dir nicht sagen wie genau, aber denke der Lösungsansatz wäre "DATUM" lediglich auf den Tag zu beschränken und die Zeit nicht mit einzubeziehen!

 

[DonRodi]

Schau dir einfach mal die Funktion DateSerial() genauer an, über diese kannst du dann sehr einfach mit Ganzzahlen rechnen und zum Schluss musst du das Ergebnis via FormatDateTime() wieder umkonvertieren und ausgeben.

Hoffe geholfen zu haben.

 

[antifa2004]

Danke euch, habs gelöst!

Für alle die, die es interessiert, hier der Makro-Ausdruck:

Jahr(Datum())-Jahr([Geburtsdatum])-Wenn((Monat(Datum())*40+Tag(Datum()))>=(Monat([Geburtsdatum])*40+Tag([Geburtsdatum]));0;1)