Office: (Office 2010) Datumsdifferenz Ausgabe in Tage/Monate/Jahre

Hallo Leute,

ich habe ein Problem, ich beschäftige mich seit neustem mit MS2010 Access und baue mir einen Zeitraumsrechner.

Jedoch bekomme ich es nicht (auch nach Stundenlanger Suche im Internet) hin, einen Zeitraum der als Tage ausgegeben wird in Tage/Monate/Jahre auszugeben.

Vorgefertigte SQL Texte helfen mir wenig weiter.

Funktion sieht wie folgt aus:

BisDatumZeitraum - VonDatumZeitraum

Ergebnisausgabe erfolgt nach Klick auf Button „Befehl35“.

Vielen Dank im Voraus

:)

 

Hallo!

Vielleicht kann hier jemand schon eine fertige Funktion anbieten.

Doch ist in jedem Fall Handarbeit angesagt.
Schau Dir den VBA-Befehl Datediff an.

Doch Achtung:
Datediff("m","1.1.2015","31.5.2015") ergibt 4.
und
Datediff("m","1.1.2015","30.5.2015") auch.
Wenn also Datumsangaben erfaßt werden, muß geklärt sein ob bei "von" 0:00 Uhr und bei "bis" 24:00 (zugleich 0:00 des nächsten Tages) gemeint ist. Schließlich ist ein Urlaubszeitraum 2.5.2015-2.5.2015 ein Urlaubstag.

Wolfgang

 

Schon mal Danke,

aber soweit bin ich schon.

Wenn ich z.B. von 01.01.2014 bis 02.02.2015 rechne, soll da nicht 397 stehen, sondern 1/1/1 für ein Tag ein Monat und ein Jahr.

 

Hallo !

Du mußt DateDiff natürlich mehrmals aufrufen.
Einmal im "yyyy" und das Ergebnis (=Anzahl Jahre) mit DateAdd und "yyyy" zum ursprünglichen addieren.
dann mit "m" und das Ergebnis (=Anzahl Monate) wieder mit DateAdd und "m" zum Zwischenergebnis addieren, und dann noch einmal mit "d", ergibt Anzahl Tage.

Wolfgang

 

Hallo,

Du gehst also davon aus, dass ein Monat immer 31 Tage hat?

 

Hallo!

DateAdd rechnet schon richtig:
? dateadd("m",1,"4.2.2015") ergibt 04.03.2015.
und
? dateadd("m",1,"31.3.2015") ergibt 30.04.2015

Wolfgang

 

hallo
evtl. was für Dich
in meiner Doc s. Fusszeile unten rechts
Seite 309
10.19.50 Datum Differenz in Jahr / Monat / Tag

evtl auch interesant
DatumZeit Differenz in hhh.mm.ss …. Seite 310
und auch weitere Seiten

 

Da Du über einen Zeitraumrechner nachdenkst, hast Du doch einen Algorithmus im Kopf, wie Du Tage in Jahre/Monate/Tage zerlegst (so per Hand). Die "Funktion" wäre dann nur die Umsetzung dieses Ablaufes mit in dem Fall VBA-Anweisungen.

Was hast Du bereits?

 

Hallo
meine Routine in meiner Doc
gibt mit Deinen Beispiel Daten:
je nach k oder L (immer in der Form Jahr Monat Tag)
?TestDatDifInJMT("01.01.2014","02.02.2015","k")
1 1 1
oder
?TestDatDifInJMT("01.01.2014","02.02.2015","L")
1 Jahr und 1 Monat und 1 Tag

 

Vielen Dank für die zahlreichen Bemühungen.

Ich denke die Formel von Seite 309 des Herrn Rudolf ist genau das was ich suchte.
Nur leider bin ich was VBA angeht völlig neu.
Ich komme mit dem einfügen des Codes nicht zurecht und bin mir auch nicht sicher in wie weit ich sie verwenden soll.

Grüße

 

Hallo
ich mache Dir eine Muster Mdb mit diesem Code
noch Heute

 

Hallo
hier im Anhang die versprochene MDB
es gibt einn Modul MDLDatDif
ein Formular FrmDifBer mit einem Buttom zum berechnen der Differenz nach eingabe von bis Datums klicken
eine Tabelle TblDaiDif
eine Abfrage TblDaiDif Abfrage

 

Funktioniert einwandfrei.

Vielen Dank an alle die mitgewirkt haben und besonders an Herrn Rudolf.

Hiermit schließe ich dieses Thema *Smilie

 

Eine kleine Anmerkung würde mir noch fehlen *biggrin.gif*

Ich muss bei einigen Zeiträumen den ersten Tag miteinrechnen, dies geschieht über ein Optionsfeld.

Wo würde ich dies einbauen?

 

Z. B. im Klilck-Ereignis des Buttons:
Code: