FONCTION QUI RENVOIE SI LE JOUR EST FÉRIÉ OU NON

rjlfrance - 14 sept. 2001 à 22:16
pillsmen Messages postés 27 Date d'inscription samedi 27 mai 2006 Statut Membre Dernière intervention 3 juillet 2007 - 7 mai 2007 à 16:10
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/1251-fonction-qui-renvoie-si-le-jour-est-ferie-ou-non

pillsmen Messages postés 27 Date d'inscription samedi 27 mai 2006 Statut Membre Dernière intervention 3 juillet 2007
7 mai 2007 à 16:10
J'oubliais :p mais là c'est vraiment histoire de dire,
il manque une déclaration de variable ;) :

Dim JJ, AA As Integer => Dim JJ, MM, AA As Integer 
pillsmen Messages postés 27 Date d'inscription samedi 27 mai 2006 Statut Membre Dernière intervention 3 juillet 2007
7 mai 2007 à 15:47
J'ai pas entièrement testé cet algo, mais j'suis super étonné.
J'ai moi même codé cette fonction qui retourne les jours fériés (jour fériés "mobiles" compris) mais il y a beaucoup plus de lignes... Rien que le calcul de la dâte de Pâques par l'algorithme de Odin (trouvé sur Wikipédia) prend autant de lignes (bon Ok j'exagère :p) que cette fonction.
Dommage, j'aurais préféré des commentaires au niveau du calcul des dâtes des jours fériés mobile (ceux présents DANS le code sont...inutiles, les variables étant assez explicites ;)
Merci pour la source elle sera réutilisée !
vbtom Messages postés 229 Date d'inscription dimanche 3 juin 2001 Statut Membre Dernière intervention 5 octobre 2003
27 févr. 2002 à 15:51
Pkoi tu veux un zip ta la source sous les yeux....
Where is zip ? please
Rejoignez-nous