begin process at 2012 02 09 02:45:05
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

Date & Heure

 > NOMBRE DE JOURS OUVRABLES ENTRE DEUX DATES

NOMBRE DE JOURS OUVRABLES ENTRE DEUX DATES


 Information sur la source

Note :
6,38 / 10 - par 8 personnes
6,38 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Date & Heure Classé sous :jours, ouvrables, weekday Niveau :Débutant Date de création :23/02/2000 Vu :20 106
Auteur : Black_Pit

Ecrire un message privé
Site perso
Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note

 Description

Petite fonction qui calcul le nombre de jours ouvrables entre deux dates.  Elle compte la journée en cours et la dernière journée.  ATTENTION: Ne tiens pas compte des jours fériés!!!

Source

  • Public Function JoursOuvrables(ByVal DateDébut As Date, ByVal DateFin As Date) As Integer
  • 'Initialisation selon si c'est un jour de semaine (<6) ou de fin de semaine (>=6)
  • If WeekDay(DateDébut, vbMonday) < 6 Then
  • JoursOuvrables = 1
  • Else
  • JoursOuvrables = 0
  • End If
  • Do Until DateDébut > DateFin
  • If WeekDay(DateDébut, vbMonday) < 6 Then
  • JoursOuvrables = JoursOuvrables + 1
  • End If
  • DateDébut = DateDébut + 1
  • Loop
  • End Function
Public Function JoursOuvrables(ByVal DateDébut As Date, ByVal DateFin As Date) As Integer
  'Initialisation selon si c'est un jour de semaine (<6) ou de fin de semaine (>=6)
  If WeekDay(DateDébut, vbMonday) < 6 Then
    JoursOuvrables = 1
  Else
    JoursOuvrables = 0
  End If

  Do Until DateDébut > DateFin
    If WeekDay(DateDébut, vbMonday) < 6 Then
      JoursOuvrables = JoursOuvrables + 1
    End If
    DateDébut = DateDébut + 1
  Loop
End Function



 Sources de la même categorie

Source avec Zip Source avec une capture LES FONCTIONS DATE PAR L'EXEMPLE. par pasquet78
Source avec Zip Source avec une capture CALENDRIER, MODE D'EMPLOI par pasquet78
Source avec Zip Source avec une capture Source .NET (Dotnet) HORLOGE DIODE AVEC 3 ALARMES ET REMISE À L'HEURE par EhJoe
Source avec Zip Source avec une capture POINTEUSE HORAIRES PAR SEMAINE par VBNoob13
Source avec Zip Source avec une capture HORLOGE À AIGUILLES SIMPLEMENT DANS UN USERFORM EXCEL par bigbe
Toutes les sources de la catégorie Date & Heure

 Sources en rapport avec celle ci

SUPPRIME FICHIERS DATANT DE PLUS DE 15 JOURS !!!! par mohax007
Source avec Zip Source avec une capture GRÂCE À UNE DATE : NOMBRES DE JOURS PASSÉS DEPUIS CETTE DATE... par Antitrust
RENDRE VOS PROGRAMMES LIMITÉS (EX : 30 JOURS), ILIMITÉS !!! par thekingoftheweb
Source avec Zip CALCULE ENTRE 2 DATES, SUR DES JOURS OUVRABLES par claudetom
Source avec Zip NOMBRE DE JOURS par JLB59

Commentaires et avis

Commentaire de Kendj le 09/12/2006 16:11:25

je voudrai comment om peut compter le nombre de samedi et de dimanche comprise entre 2 date avec ce code. envoyer lme moi sur mon adresse:ken_vip_dj@yahoo.fr
merci

Commentaire de teckmicro2008 le 05/03/2009 01:28:36

bonjour ! j'ai essayer votre code mais j'ai problème !!

JoursOuvrables(ByVal DateDébut As Date, ByVal DateFin As Date) As Integer

je voudrais comment vous proceder pour si j'ai texte1=datedebut et texte2=datedefin  !

voila je n'arrives pas a entree votre formule entier !

car avec as date et byval ! ça pose problème  

merci de m'aider !!!  

cordialement  

Commentaire de akbi_9702 le 16/11/2009 11:17:55

COMMENT REMPLIR UN DATAGRID AVEC LES PRIX MOYENS DE MARCHANDISES ENTRE DEUX DATES CONNUES

DATAGRID:

PRODUIT        PRIX MOYEN
AZERTY            100,00

Commentaire de fonio le 18/02/2010 12:06:27

bonjour,

ligne 13 :     DateDébut = DateDébut + 1

= addition d'un entier à une date !!!

=> DateDébut.AddDays(1)

Commentaire de dhawsami le 29/04/2010 01:34:56

CODE source= la defference entre deux date qui doit afficher dans datagridview et merci

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

jours ouvrables [ par lizarajim ] Bonjour,je cherche une formule VB permettant de calculer le nombre de jours ouvrables mensuels tout en excluant les dimanches (je souhaite consid&#233 Gestion de personnel "cadres" [ par egval ] Bonjour,Je recherche une feuille de calcul, type open office calc ou excel, me permettant de comptabiliser les jours travaillés, les maladies, les con Mise en forme conditionnel VBA avec +3 conditions [ par drik56 ] Salut,Je voudrais mettre en rouge les jours fériés sur un planning, j'ai ma liste de jour fériés mais j'ai plus de 10 jours donc plus de 10 conditions Changer la couleur de certains jours de mscal (ACCESS) [ par lenium ] Bonjour,quelqu'un saurait-il comment changer les couleurs de certains jours du calendrier mscal de access?En fait je veux pouvoir changer la couleur d comment modifier l'apparence d'un formulaire [ par thierylaurent ] bonjour a tous je vient d'aller voir le programme x-lite 3.0 qui est relativement bien fait et une question a éffleuré ma pensé, comment arriver a mod Nbre de jours entre deux dates ... [ par lebasketeur ] Bonjour tout le monde,Voila j'ai un probleme de requete Acces, je travaille une application sur VB 6.0Je veux calculer le nombre de jour entre la date Evaluation [ par harissmed ] Salut tout le monde c'est vraiment sympa de se joindre à vous, voila ma requette :j'ai conçu une petite application et j'aimerais bien que vous m'aidi Combien de jours en fait ? [ par LarissaXD ] Alors bonjour,alors j'ai pas mal visiter votre site et j'ai actuellement un problem, je pense et j'espère que vous serez a meme d'apporter une réponse Définition du monbre de jour [ par LarissaXD ] Voila Bonjour,mon probleme aujourd'hui est le suivant : j'ai ma colonne B qui ne doit prendre en compte que le nombre de jours de la période de chaque message d'erreur [ par sylvoc69 ] voila mon probleme :je me suis inscrit et j'ai valider mon compt lors de la reception du mail et je me suis connecter mais a chaque fois que je clique


Nos sponsors


Sondage...

Comparez les prix


Mio - Moov V735 - GPS Europe - Ecran 7"
Entre 305€ et 375€

Visiter le guide achat

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

Photo Waterfall in Kauai Hawaii With RainbowPhoto Single Large Rock Formation in Monument Valley
Photo Water in the Beginning of the Grand Canyon 

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,452 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)