[Custom functie] Kwartaal(een_datum)

[Rony Rabijns]

Deze custom function geeft je het kwartaal van een bepaalde datum.

 

Syntax : Kwartaal(een_datum)

 

Let (
[
HuidigJaar = Year(Get(CurrentDate))
];

Case(
Date(Month(een_datum);Day(een_datum);HuidigJaar) >= Date ( 1 ; 1 ; HuidigJaar) and 
Date(Month(een_datum);Day(een_datum);HuidigJaar) <= Date ( 3 ; 31 ; HuidigJaar);
"Q1";
Date(Month(een_datum);Day(een_datum);HuidigJaar) >= Date ( 1 ; 4 ; HuidigJaar) and 
Date(Month(een_datum);Day(een_datum);HuidigJaar) <= Date ( 6 ; 30 ; HuidigJaar);
"Q2";
Date(Month(een_datum);Day(een_datum);HuidigJaar) >= Date ( 1 ; 7 ; HuidigJaar) and 
Date(Month(een_datum);Day(een_datum);HuidigJaar) <= Date ( 9 ; 30 ; HuidigJaar);
"Q3";
Date(Month(een_datum);Day(een_datum);HuidigJaar) >= Date ( 1 ; 10 ; HuidigJaar) and 
Date(Month(een_datum);Day(een_datum);HuidigJaar) <= Date ( 12 ; 31 ; HuidigJaar);
"Q4")
)

[rmw]

Omdat we zuinige hollanders zijn, hier een kortere versie.

 

Syntax: Kwartaal ( theDate )

 

"Q" & Int ( ( Month ( theDate ) - 1 ) / 3 ) + 1

 

rmw

[Rony Rabijns]

Omdat we Belgen zijn : "Chapeau !”

[Freesurfer]

Dat was nu net iets dat ik ook kan gebruiken!

 

Knap

 

Groeten,

 

Jan