Dagen weekend niet tellen

Status
Niet open voor verdere reacties.

Chrisss

Gebruiker
Lid geworden
20 jan 2006
Berichten
72
Hallo,

Ik heb een vraag. Ik wil in een formule het aantal dagen tellen vanaf een variabele datum tot de datum van vandaag.

Doe ik dan als volgt: =Date()-[datum]

Is er een manier om hierin op te nemen dat zaterdagen en zondagen niet mee worden geteld?

Groeten,

Chris
 
Je kunt het eens met de volgende formule proberen:

Code:
Dagen: Int((DateDiff("d";[Datum];Date()))/7)*5+IIf(Weekday([Datum];2)>5;Weekday(Date();2);
IIf(Weekday([Datum];2)>Weekday(Date();2);5-(Weekday([Datum];2)-Weekday(Date();2));(Weekday(Date();2)-Weekday([Datum];2))))

Wil je de huidege dag ook meetellen, dan moet je er nog één bij optellen.
Als je uitleg wilt, dan zie ik dat wel!

Michel
 
Hey Michel!

Super! Werkt perfect! Dank voor de snelle reactie!!

Groet,

Chris
 
Met een kleine aanpassing is de formule nog wat algemener inzetbaar:
Door er een functie van te maken, kun je hem eenvoudig in elke query gebruiken. Je krijgt dan: Werkdagen)[Datum]) in je query, en das toch een stuk korter!

Code:
Public Function WerkDagen(Datum As Date)

WerkDagen = Int((DateDiff("d", [Datum], Date)) / 7) * 5 + _
    IIf(Weekday([Datum], vbMonday) > 5, _
    Weekday(Date, vbMonday), _
    IIf(Weekday([Datum], vbMonday) > Weekday(Date, vbMonday), _
        5 - (Weekday([Datum], vbMonday) - Weekday(Date, vbMonday)), _
        (Weekday(Date, vbMonday) - Weekday([Datum], vbMonday)))) + 1

End Function

Tis maar een idee...

Michel
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan