Dll de calculs des jours fériés et jours ouvrables

Soyez le premier à donner votre avis sur cette source.

Vue 12 529 fois - Téléchargée 2 193 fois

Description

Comme le dit le titre, il s'agit d'une DLL qui contient plusieurs fonctions sur les dates :
- vérifier si une date est fériée (france),
- fournit la liste des jours fériés d'une année,
- calcul le nombre de jours ouvrables et ouvrés entre deux dates
- calcul le nombre de jours d'un mois

Conclusion :


Je pense ajouter des fonctions au fur et à mesure des besoins.
Merci de m'indiquer ce qui vous semblerait utile.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

cs_Jack
Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
62 -
Salut foxi78
Bravo pour cette DLL : je n'ai pas vérifié les résultats, mais ça peut être partique.

En ce qui concerne le code de l'exemple :
Pour vider une Liste, rien de plu simple que le .Clear
Audacieux le Split(Split()) !! Ca vaut quand même le coup de décomposer.
La définition des paramètres n'est pas claire : Dans Work_Days, tu ajoutes en option "ferie" qui est sencé faire la différence entre Ouvré et Ouvrable : Vaudrait mieux mettre "Ouvré" (ouvré : 5 jours, ouvrable : 6 jours) ... En fait, j'ai vu dans la DLL que tu avais supprimé l'option Ouvré, ce qui explique peut-être ...

Bref : de bonne idées, des manips de date intéressantes et une création de DLL est une bonne idée.
Manque un peu de commentaire et une optimisation.
foxi78
Messages postés
1
Date d'inscription
mardi 2 septembre 2003
Statut
Membre
Dernière intervention
4 mars 2004
-
Merci pour ces remarques très constructives.

Je les prend en compte pour la prochaine version.
harigan
Messages postés
1
Date d'inscription
lundi 15 mai 2006
Statut
Membre
Dernière intervention
24 juin 2006
-
BRAVOOOOOOOOOOOOOOOOOOOOOO c de la génie
ibousice
Messages postés
2
Date d'inscription
mercredi 21 juin 2006
Statut
Membre
Dernière intervention
8 juillet 2006
-
Bonjour,

j'aimerais lancer la macro ci -dessous automatiquement le dernier jour ouvrable du mois , je ne tiens pas compte des jours fériés.
As tu une idée sur l'évolution à apporter à la macro pour arriver au résultat. la macro se trouve ds la feuille ThisWorbook:
Private Sub Workbook_Open()
If Application.WorksheetFunction.Weekday(Now, 2) < 6 Then
Application.OnTime TimeValue("08:00:00"), "TOTO"
Else
End If
End Sub

Merci d'Avance
aabi
Messages postés
1
Date d'inscription
mercredi 14 novembre 2007
Statut
Membre
Dernière intervention
19 novembre 2007
-
JE VOUS REMERCIE POUR VOTRE APPLICATION ELLE EST TRES UTILE, MOI JE SUIS ENTRAIN DE PROGRAMMER EN VB UNE APPLICATION QUI CALCULE LA DIFFERENCE ENTRE DEUX DATES TOUT EN EXCLUANT LES DIMANCHES ET LES JOURS FERIES. ALORS PENSEZ VOUS POUVOIR M AIDER MERCI D AVANCE

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.