FONCTION JOURSFÉRIÉS (FIXES ET MOBILES) JUSQU'EN 2030 UTILISABLE EN VBA EXCEL, A
Renfield
Messages postés
17287
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
27 septembre 2021
-
5 déc. 2008 à 10:13
cs_nerim Messages postés 82 Date d'inscription samedi 13 décembre 2003 Statut Membre Dernière intervention 14 avril 2012 - 7 déc. 2008 à 20:47
cs_nerim Messages postés 82 Date d'inscription samedi 13 décembre 2003 Statut Membre Dernière intervention 14 avril 2012 - 7 déc. 2008 à 20:47
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/48637-fonction-joursferies-fixes-et-mobiles-jusqu-en-2030-utilisable-en-vba-excel-access-word-ou-vb6
https://codes-sources.commentcamarche.net/source/48637-fonction-joursferies-fixes-et-mobiles-jusqu-en-2030-utilisable-en-vba-excel-access-word-ou-vb6
7 déc. 2008 à 20:47
Merci du renseignement, c'est en effet un peu plus élégant.
Et à l'intention des débutants auxquels s'adresse ce code :
Je m'aperçois que j'ai oublié de commenter dans mon code l'utilisation des valeurs numériques dans l'instruction FM=Array(38824,...).
Il s'agit, bien entendu des valeurs numériques (DateSerial) des dates des lundis de Pâques. Cela me permet une initialisation plus facile du tableau des LdP (les dates entrées dans Excel et mises au format standard ont ensuite été copiées/collées dans le code. Quelques Suppr et quelques virgules et le tableau est initialisé). Pas très parlant dans le code mais bien pratique...
Nerim
5 déc. 2008 à 10:13
....
tu peux faire, plutot:
Optional DimanchesOuiNon As Boolean = False (ce qui, de toutes facon est la valeur par défaut)