08. november 2005 - 11:21
Der er
5 kommentarer og
1 løsning
Diference mellem måneder
Jeg vil gerne have differencen i måneder mellem to datoer. Men hvis 1. måned er = "07-11-2005" og 2. måned er "05-10-2005" og jeg bruger datediff skriver den "1". Den skal i dette tilfælde skrive "2" da der er 1 måned og 2 dage imellem datoerne.
How to do that?
08. november 2005 - 11:36
#1
Hej.
Så må du tage differencen i dage og hvis den er over 31 kalde den for 2.
Er det kun hele måneder der er interessant, kan du bruge format(dato,"mm") på begge og tage differencen. Ved årsskifter må du så lave lidt beregninger.
/jørn
08. november 2005 - 22:36
#3
noget a la dette, men giver fejl veed samme måned
If (DateDiff("M", dato1, dato2, vbMonday, vbFirstFourDays)) / Int((DateDiff("M", dato1, dato2, vbMonday, vbFirstFourDays))) <> 0 Then
A = (DateDiff("M", dato1, dato2, vbMonday, vbFirstFourDays)) + 1
Else
A = (DateDiff("M", dato1, dato2, vbMonday, vbFirstFourDays))
End If
08. november 2005 - 23:22
#4
tempdate = DateSerial(Year(date2), Month(date2), 1)
MsgBox DateDiff("m", date1, tempdate) + IIf(Day(date2) > Day(date1), 1, 0)
