Alter ermitteln zwischen zwei Datumswerte

[Pergus]

Hallo an Alle!

Erstmal habe ich für Euch eine Lösung statt einer Frage, vielleicht kann sie dem einen oder anderen von Euch nützlich sein!

Zum Thema: In einem Formular (in meinem Fall 'frmMitglieder') stehen 3 Textfelder

1. Textfeld: 'Eintrittsdatum' (gebunden an das Feld der Tabelle 'tblMitglieder')
2. Textfeld: 'Austrittsdatum' (gebunden an das Feld der Tabelle 'tblMitglieder')
3. Textfeld: 'Mitgliedsjahre' (ungebundenes Textfeld, hier kommt die errechnete Anzahl der Mitgliedsjahre hinein!)

Im Steuerelementinhalt des 3. Textfeldes 'Mitgliedsjahre' folgendes eingeben:

Code [Auswählen] Erweitern

=Wenn([Austrittsdatum]>0;"insgesamt " & DatDiff("jjjj";[Eintrittsdatum];[Austrittsdatum])+(Format([Austrittsdatum];"mmtt")<Format([Eintrittsdatum];"mmtt")) & " Jahre";DatDiff("jjjj";[Eintrittsdatum];Datum())+(Format(Datum();"mmtt")<Format([Eintrittsdatum];"mmtt")))

So, und was passiert nun:

Steht im 2. Textfeld 'Austrittsdatum' ein Datum, so errechnet die Formel die Differenz zwischen Ein- und Austrittsdatum des Mitglieds
und gibt sie als Text in folgendem Format wieder: z.B. 'insgesamt 14 Jahre'

Steht im 2. Textfeld 'Austrittsdatum' hingegen kein Datum, so errechnet die Formel die Differenz zwischen Eintrittsdatum des Mitglieds
und das heutige Datum und gibt die effektive Jahresanzahl in folgendem Format wieder: z.B. '10'

Hoffe, das ich jemanden damit helfen konnte! 

Schöne Grüße

Gustav