Hej! Om dina datum är av datatypen Date kan du använda vanliga matematiska operationer på dem. MittDatum = #1/25/1986# Det finns ett problem med ovanstående beräkning. Ponera att medlemen inte hunnit fylla år än.Räkna ut år mellan datum?
Tänkte på när en medlem fyller i vilket datum de är födda(1986-01-25)
Så vill jag räkna ut hur många år det är sedan den medlemmen är född och dagens datum
1986-02-25 - 2001-10-07 = 15 år
*Joel!*Sv: Räkna ut år mellan datum?
//EmmaSv: Räkna ut år mellan datum?
Var = Year(Date) - Year(MittDatum)
/StaffanSv: Räkna ut år mellan datum?
MittDatum = #12/25/1986#
' Anta att dagens datum är 10/11/2001
Var = Year(Date) - Year(MittDatum)
Resultatet kommer fortfarande att bli 15, trots att medlemen fortfarande är 14 år. Detta går att lösa till exempel genom att lägga till följande rader:
If Month(Date) < Month(MittDatum) then
Var = Var - 1
elseif Month(Date) = Month(MittDatum) then
if Day(Date) < Day(MittDatum) then
Var = Var - 1
end if
end if