Accueil > > > NOMBRE DE JOURS OUVRABLES
NOMBRE DE JOURS OUVRABLES
Information sur la source
Description
Cette fonction assez, simple d'utilisation et pas vraiment optimisée, permet de donner le nombre de jours ouvrables pour un mois et une année donnée.
Source
- Function MonthlyWorkingDays(ByVal YearNumber As Integer, ByVal MonthNumber As Integer) As Integer
- Dim I As Integer
-
- I = Day(DateSerial(YearNumber, MonthNumber + 1, 0))
- While I > 0
- If Weekday(DateSerial(YearNumber, MonthNumber, I), vbMonday) < 6 Then
- MonthlyWorkingDays = MonthlyWorkingDays + 1
- End If
- I = I - 1
- Wend
- End Function
Function MonthlyWorkingDays(ByVal YearNumber As Integer, ByVal MonthNumber As Integer) As Integer
Dim I As Integer
I = Day(DateSerial(YearNumber, MonthNumber + 1, 0))
While I > 0
If Weekday(DateSerial(YearNumber, MonthNumber, I), vbMonday) < 6 Then
MonthlyWorkingDays = MonthlyWorkingDays + 1
End If
I = I - 1
Wend
End Function
Sources du même auteur
Sources de la même categorie
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
Nombre de jour entre 2 Date !!! [ par Sylvain ]
Comment peux on calculer le nombre de jour qu'il y a entre 2 date :Exemple :19/08/99 - 19/07/88 = ?Merci d'avance
Calcul de jour !! [ par Quickeneen ]
hello tous le monde, je voudrais savoir comment trouver le nombre de jour qu'il y a entre 2 date.et egalement savoir coment calculer une date en ayant
jour ouvré [ par conimast ]
Dans un tableau excel j'ai une colonne avec un nombre de jour de retard.Actuellement ce nombre de jour est en jour calendaire.Comment l'avoir Comment
aide pour un petit algorithme [ par albert0 ]
Salut all.voila,je voulais savoir si quelu'un peut me dire comment on fait pour calculer le nombre de Jour entre deux date donné? ( a savoir que j'ai
??? nombre de jour ouvré par mois ??? [ par yo1333 ]
bonjour, j'aurais voulu savoir si à votre connaissance, il existait une fonction permettant de retourner le nombre de jour ouvré par mois...Donc, s'il
nombre de jour ouvré [ par h_adil ]
bonjourcomment a partir dela fonction qui calcule le nombre de jour ouvrée je trouve la date exacte de jour exemple j'ai un nombre de
Nombre de jour ovre en france [ par tfoutu1 ]
sous Access , je dois calculer le nb de jour ouvre en tenant compte de jours feriesje passe sous excel avec 1 feuille qui contient le calendrier a com
Connaitre le nombre de jour [ par dork_maule ]
J'ai un champs texbox avec un date et un deuxiéme textbox avec une deuxiéme date.Comment peut-on faire pour connaitre le NOMBRE de jour qui
Comment connaitre le nombre de jour sur l'année d'une date ? [ par njac ]
salut, Je voudrai connaître à partir d'une date, son nombre de jours sur l'année, exemple: 31/12/2004, son nombre de jours est 365 sur
VB6 - Weekday -Ca marche et ça ne marche plus ! [ par smilingjoe2 ]
Bonjour,Il m'arrive une chose curieuse, j'ai un code qui fonctionne dans une form et pas dans l'autre. Dans le 2ème form, je bug sur 'année'
|
Derniers Blogs
MBA : POURQUOI FAIRE ET COMMENT LE CHOISIR ?MBA : POURQUOI FAIRE ET COMMENT LE CHOISIR ? par ROMELARD Fabrice
Formation initiale Durant la formation, le découpage classique est le suivant (je donnerai les équivalences Suisse lorsque je les connaîtrais) : Ecole primaire jusqu'au Collège : Formation générale permettant d'obtenir les méthodes...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice Y'A DES ERREURS QUI PEUVENT RENDRE LE DéVELOPPEUR VIOLENTY'A DES ERREURS QUI PEUVENT RENDRE LE DéVELOPPEUR VIOLENT par Aleks
Quand on a ce genre d'erreur sans log :
Et bas on a juste envie de choper le gas de Microsoft qu'a développé ça et lui foutre des baffes de Coboye ! ...
Cliquez pour lire la suite de l'article par Aleks [HYPER-V 3] PRéSENTATION DES COMMANDLETS POWERSHELL[HYPER-V 3] PRéSENTATION DES COMMANDLETS POWERSHELL par Pierrick CATRO-BROUILLET
Avec la sortie prochaine de la Beta Consumer Preview de Windows 8, j'avais envie de revenir sur une des fonctionnalités que j'attends le plus et que, en bon geek que je suis, j'utilise déjà : Hyper-V 3 ainsi son module PowerShell.
Il y a déjà pléthor...
Cliquez pour lire la suite de l'article par Pierrick CATRO-BROUILLET IIS7 - COMPRESSION GZIPIIS7 - COMPRESSION GZIP par cyril
La compression GZIP permet d'améliorer les performances de navigation en compressant ce qu'envoie le serveur à un client. Pour comprendre comment cela fonctionne, regardons ce qu'il se passe au niveau HTTP lorsqu'un client tente d'accéder à une ress...
Cliquez pour lire la suite de l'article par cyril SHAREPOINT 15 TECHNICAL PREVIEW MANAGED OBJECT MODEL SOFTWARE DEVELOPMENT KITSHAREPOINT 15 TECHNICAL PREVIEW MANAGED OBJECT MODEL SOFTWARE DEVELOPMENT KIT par Matthew
http://www.microsoft.com/download/en/details.aspx?id=28768&utm_source=feedburner&utm_medium=feed&utm_campaign=Feed%3A+MicrosoftDownloadCenter+(Microsoft+Download+Center) ...
Cliquez pour lire la suite de l'article par Matthew
Logiciels
Easy-Planning (1.0.0.1)EASY-PLANNING (1.0.0.1)Basé sur les mêmes principes que MyPlanning, Easy-Planning permet de créer des plannings sous la ... Cliquez pour télécharger Easy-Planning Academy System (17.1.3.0)ACADEMY SYSTEM (17.1.3.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System COLLECTOR PLUS (3.00B)COLLECTOR PLUS (3.00B)COLLECTOR PLUS version 3.00B est un logiciel utilisant une base de données alimentée par :
- L... Cliquez pour télécharger COLLECTOR PLUS PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V7.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO LettresFaciles 2011 (8.0.0.1)LETTRESFACILES 2011 (8.0.0.1)LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types.
Son inte... Cliquez pour télécharger LettresFaciles 2011
|