Office: Datum vor 1900-nächster Geburtstag

Hallo Excel-Gemeinde,

die Altersberechnung, wenn das Geburtsdatum vor 1900 liegt,
habe ich hinbekommen.

An der Berechnung des nächsten Geburtstags und des Altes dann,
scheitere ich leider und bitte um eure Hilfe.

Meine Tabelle seht ihr hier:
http://www.file-upload.net/download-1616484/Gebtg-test.xls.html

Vielen Dank schon mal.
Gruß florian

 

Hallo Florian,

hier die etwas länglichen Formeln:
Zelle C3: Alter in vollen Jahren am heutigen Tag:
=WENN($A3="";"";DATEDIF(WENN(ISTTEXT($A3);DATWERT(ERSETZEN($A3;LÄNGE($A3)-3;4;1900));$A3);HEUTE();"y")+WENN(ISTTEXT($A3);1900-RECHTS($A3;4);0))

Zelle E3: Falls bereits gestorben: Alter in vollen Jahren am Todesdatum:
=WENN(ODER($A3="";$D3="");"";DATEDIF(WENN(ISTTEXT($A3);DATWERT(ERSETZEN($A3;LÄNGE($A3)-3;4;1900));$A3);$D3;"y")+WENN(ISTTEXT($A3);1900-RECHTS($A3;4);0))

Zelle F3: Nächster Geburtstag (ab heutigem Tag):
=WENN($A3="";"";DATWERT(WENN(ISTTEXT($A3);LINKS($A3;LÄNGE($A3)-4);TEXT($A3;"TT.MM."))&(JAHR(HEUTE())+(TEXT(HEUTE();"MMTT")>=TEXT(WENN(ISTTEXT($A3);DATWERT(ERSETZEN($A3;LÄNGE($A3)-3;4;1900));$A3);"MMTT")))))

Zelle G3: Alter in Jahren zum Datum F3:
=WENN($A3="";"";$C3+1)

 

Hallo Exl121150,
vielen Dank für deine Hilfe.
Die Formeln passen super.

Gruß florian

 

Hallo,
ich noch mal zu dem Thema.
Die Formeln von Exl121150 sind ok.
Ein kleines Problem ergibt sich jedoch noch.
Wenn das Todesdatum auch vor 1900 liegt, kommt Fehler "#Wert!" beim Alter am Todestag.

Vielleicht hat da noch jemand eine Lösung.
Vielen Dank schon mal.

Gruß florian

 

Hallo Florian,

um die Formeln durch die zusätzliche Behandlung des Todesdatums nicht total unübersichtlich werden zu lassen,

1) definiere zuerst einmal 4 Namen:
1a) Stelle dazu die aktive Zelle irgendwo in Zeile 3 des Arbeitsblattes
1b) Wähle im Excel-Menü: Einfügen > Namen > Namen definieren... , sodass das Dialogfenster 'Namen definieren' erscheint.
1c) In dieses gib ins Feld 'Namen in der Arbeitsmappe' Folgendes ein: Tabelle1!GEB1900
im Feld 'Bezieht sich auf:' gib Folgendes ein:
=WENN(ISTTEXT($A3);DATWERT(ERSETZEN($A3;LÄNGE($A3)-3;4;1900));DATUM(1900;MONAT($A3);TAG($A3)))
Klicke auf den Schalter 'Hinzufügen'.
1d) Gib ferner ins Feld 'Namen in der Arbeitsmappe' ein: Tabelle1!GEBDF1900
im Feld 'Bezieht sich auf:' gib Folgendes ein:
=WENN(ISTTEXT($A3);1900-RECHTS($A3;4);1900-JAHR($A3))
Klicke auf den Schalter 'Hinzufügen'.
1e) Gib ferner ins Feld 'Namen in der Arbeitsmappe' ein: Tabelle1!TOD1900
im Feld 'Bezieht sich auf:' gib Folgendes ein:
=WENN(ISTTEXT($D3);DATWERT(ERSETZEN($D3;LÄNGE($D3)-3;4;1900));DATUM(1900;MONAT($D3);TAG($D3)))
Klicke auf den Schalter 'Hinzufügen'.
1f) Gib ferner ins Feld 'Namen in der Arbeitsmappe' ein:Tabelle1!TODDF1900
im Feld 'Bezieht sich auf:' gib Folgendes ein:
=WENN(ISTTEXT($D3);1900-RECHTS($D3;4);1900-JAHR($D3))
Klicke auf den Schalter 'Hinzufügen'.
Nachdem jetzt die 4 Namen definiert sind, klicke auf Schalter 'Ok', damit sich das Fenster schließt.

2) Dadurch vereinfacht sich jetzt die Formeleingabe:
Zelle C3: Alter in vollen Jahren am heutigen Tag:
=WENN(A3="";"";DATEDIF(GEB1900;HEUTE();"y")+GEBDF1900)
Zelle E3: Falls bereits gestorben: Alter in vollen Jahren am Todesdatum:
=WENN(ODER($A3="";$D3="");"";DATEDIF(GEB1900;TOD1900;"y")+GEBDF1900-TODDF1900)
Zelle F3: Nächster Geburtstag (ab heutigem Tag):
=WENN($A3="";"";DATWERT(TEXT(GEB1900;"TT.MM.")&(JAHR(HEUTE())+(TEXT(HEUTE();"MMTT")>=TEXT(GEB1900;"MMTT")))))
Zelle G3: Alter in Jahren zum Datum F3:
=WENN($A3="";"";$C3+1)
wie bereits gehabt.

3) Diese 4 definierten Namen sind so konstruiert, dass sie nicht nur für die Zeile 3 gelten, sondern auch in allen nachfolgenden Zeilen (mit gleichem Spaltenaufbau) verwendet werden können.

 

Hallo Exl121150,
du bist einfach super :!: :!: :!:
Deine Lösung ist perfekt.
Das hätte ich mit meinem bescheidenen Anfängerwissen alleine nie geschafft.
Du hast mir sehr geholfen!!!
Vielen lieben Dank für deine Hilfe.

Gruß Florian

 

Hallo Exl121150,

da bin ich noch einmal.
Ich möchte dich nicht neven und überbeanspruchen,
aber ich möchte dich über einen Fehler informieren.

Beim Alter am Todestag kommt #ZAHL! wenn der Monat des Todesdatum vor dem Monat des Geburtsdatum liegt. Bei Daten vor und nach 1900.

Beisp. Gebtag 04.07.1907 Ttag 07.03.1987

Gruß Florian

 

Hallo Florian,

Du hast recht, es erscheint unter bestimmten Bedingungen der Fehler #ZAHL! in Spalte E.
Urschache des Fehlers ist die Datumsdifferenz-Funktion DATEDIF(AnfDat;EndeDat;Einheit). Diese erwartet offenbar stets, dass 'AnfDat' vor 'EndeDat' liegt, ansonsten kommt es zu einem Fehler.
Meine beiden Namen 'GEB1900' und 'TOD1900' bilden (wie die Bezeichnung schon sagen will) das Geburtsdatum und das Todesdatum auf das Jahr 1900 ab, während die beiden Namen 'GEBDF1900' und 'TODDF1900' die jeweilige Jahresdifferenz zum Jahr 1900 ermitteln. Dadurch wird zB. das Geburtsdatum '10.08.1890' auf GEB1900='10.08.1900' und der Todestag '09.08.1899' auf TOD1900='09.08.1900' abgebildet, was in der Jahresdifferenzfunktion DATEDIF("10.08.1900";"09.08.1900";"y") den Fehler verursacht.
Um den Fehler zu beseitigen, genügt es, den Todestag nicht auf das Jahr 1900, sondern auf das Jahr 1901 abzubilden.

1a) Stelle dazu die aktive Zelle irgendwo in Zeile 3 des Arbeitsblattes
1b) Wähle im Excel-Menü: Einfügen > Namen > Namen definieren... , sodass das Dialogfenster 'Namen definieren' erscheint
1c) Wähle den Namenseintrag 'TOD1900' aus und klicke den Schalter 'Löschen'
1d) Wähle den Namenseintrag 'TODDF1900' aus und klicke den Schalter 'Löschen'
1e) Gib ferner ins Feld 'Namen in der Arbeitsmappe' ein: Tabelle1!TOD1901
im Feld 'Bezieht sich auf:' gib Folgendes ein:
=WENN(ISTTEXT($D3);DATWERT(ERSETZEN($D3;LÄNGE($D3)-3;4;1901));DATUM(1901;MONAT($D3);TAG($D3))) Klicke auf den Schalter 'Hinzufügen'.
1f) Gib ferner ins Feld 'Namen in der Arbeitsmappe' ein:Tabelle1!TODDF1901
im Feld 'Bezieht sich auf:' gib Folgendes ein:
=WENN(ISTTEXT($D3);1901-RECHTS($D3;4);1901-JAHR($D3))
Klicke auf den Schalter 'Hinzufügen'.
Nachdem jetzt wieder die 4 Namen definiert sind, klicke auf Schalter 'Ok', damit sich das Fenster schließt.

2) Dadurch vereinfacht sich jetzt die Formeleingabe:
Zelle E3: Falls bereits gestorben: Alter in vollen Jahren am Todesdatum:
=WENN(ODER($A3="";$D3="");"";DATEDIF(GEB1900;TOD1901;"y")+GEBDF1900-TODDF1901)

3) Ich habe im Vorhergehenden die geänderten Stellen blau gekennzeichnet und hoffe, dass damit sämtlichen Tücken entfernt sind.

4) Eine persönliche Bemerkung zum Schluss: Da Du offenbar Florian heißt und morgen im Kalender der Hl. Florian steht, möchte ich Dir (so wie es in Österreich teilweise noch Brauch ist) zum Namenstag alles Gute wünschen.
-- aus St. Florian b. Linz in Oberösterreich.

 

Hallo Exl121150,

deine neue Version funktioniert jetzt fehlerfrei. :!:

Du hast dir sehr viel Mühe gemacht und Zeit investiert.
Dafür bedanke ich mich recht herzlich bei dir.

Vielen lieben Dank auch für deine persönlichen Glückwünsche.

Liebe Grüße aus Göttingen in Niedersachsen
florian