3
DateDiff liefert unteschiedliche Werte
Hallo alle zusammen,
habe hier ein merkwürdiges verhalten von Excel 2010 VBA
Ich möchte die differenz von zwei Datumswerten in Monaten ermittelt haben
im ersten Code wird ein falsches Ergebnis geliefert
aufstellung = Sheets("Vertrag").Cells(2, 12) ' 01.07.2014
erfassung = DateValue("08, 01, 2015")
Dat_dif = DateDiff("M", aufstellung, erfassung)
MsgBox Dat_dif 'liefert Ergebnis = 6
aufstellung = DateValue("7, 1, 14")
erfassung = DateValue("08, 01, 2015")
Dat_dif = DateDiff("M", aufstellung, erfassung)
MsgBox Dat_dif 'liefert Ergebnis = 12
kann sich hier jemand einen Reim drauf machen?
habe hier ein merkwürdiges verhalten von Excel 2010 VBA
Ich möchte die differenz von zwei Datumswerten in Monaten ermittelt haben
im ersten Code wird ein falsches Ergebnis geliefert
aufstellung = Sheets("Vertrag").Cells(2, 12) ' 01.07.2014
erfassung = DateValue("08, 01, 2015")
Dat_dif = DateDiff("M", aufstellung, erfassung)
MsgBox Dat_dif 'liefert Ergebnis = 6
aufstellung = DateValue("7, 1, 14")
erfassung = DateValue("08, 01, 2015")
Dat_dif = DateDiff("M", aufstellung, erfassung)
MsgBox Dat_dif 'liefert Ergebnis = 12
kann sich hier jemand einen Reim drauf machen?
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 277847
Url: https://administrator.de/contentid/277847
Ausgedruckt am: 26.11.2024 um 11:11 Uhr
3 Kommentare
Neuester Kommentar
Hi
Sollte
nicht
heißen ? Das wären deine fehlenden Monate
LG
Sollte
aufstellung = DateValue("7, 1, 14")
nicht
aufstellung = DateValue("1, 7, 14")
heißen ? Das wären deine fehlenden Monate
LG
es müsste aber eine differenz von 12 Monaten rauskommen
vom 01.07.14 bis 19.07.15
vom 01.07.14 bis 19.07.15
aber der Ansatz war sehr gut habe bei erfassung das Datum falsch geschrieben
