Beregning af Overtid
Jeg har fundet denne ellers fine formel, men har det problem at jeg skal kunne regne henover midnat, ved ikke helt om det har noget at sige, men mit indtastningsfelt er kun klokkeslæt? kan selvfølgelig være at det er derfor det ikke kan lader sig gøre.Public Function Overtid(ByVal Start As Date, Slut As Date, NormalStart As Date, NormalSlut As Date) As Date
Overtid = "00:00"
If Slut < Start Then Slut = Slut + 1
If Start < NormalStart Then Overtid = (NormalStart - Start)
If Slut > NormalSlut Then Overtid = Overtid + (Slut - NormalSlut)
End Function
Er der mon nogen der har en idé til hvordan det kan løses?
