VBA calcul en heures ouvrées entre 2 dates

Une question qui semble si simple, mais qui me hante depuis plusieurs jours.

J’ai un USERFORM avec 3 Textbox.

Textbox1 = 2015-04-02 10 :34 :01
Textbox2 = 2015-04-07 16 :34 :32
Textbox3 = (Nombre d’heures)

Comment puis-je calculer le nombre d’heures entre ces dates en excluant les weekends et les jours fériés?
Sachant que le 2015-04-03 est un jour férié et que les 4 et 5 avril est un jour de weekend.

J’ai un tableau [CONGÉ] contenant les journées fériées.
J’ai tenté la fonction suivante, mais elle me retourne que le nombre de jours.

Code:

---

Textbox3 = Application.WorksheetFunction.NetworkDays(Textbox1, Textbox2, [CONGER])

---

Merci de votre aide.

Bonjour,

Pour totaliser le nombre d'heures au delà de 24, tu peux essayer ce qui suit, pour les jours fériés je n'ai pas regardé mais je pense qu'il te faut les déduire de la seconde date comme dans mon exemple :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Sub Test()   Dim Date1 As Date Dim Date2 As Date   Date1 = #4/2/2015 10:34:01 AM# Date2 = #4/7/2015 4:34:32 PM#   'un jour férié est déduit ! Date2 = Date2 - 1   MsgBox Application.WorksheetFunction.Text(Date2 - Date1, "[h]:mm:ss")   End Sub

---

Hervé.