VBA fonctionnement Formule Application.NetworkDays_Intl

Bonjour,

Je rencontre un problème sur un fichier, j'ai une macro utilisant la fonction Application.NetworkDays_Intl qui fonctionne bien dans un module, mais plante dans un formulaire.

Dans un module, cela m'affiche bien le résultat. Mis en place pour tester la fonction Application.NetworkDays_Intl

Sub test()
Dim nbjour As Integer
Sheets("Absences").Activate
nbjour = Application.NetworkDays_Intl(Range("d4"), Range("E4"), 11, [Feries])
Range("H8").Value = nbjour
End Sub

Dans mon formulaire

Private Sub txtDateFin_Change()

Me.lblMessage = Application.NetworkDays_Intl(Me.txtDateDebut, Me.txtDateFin, 11, [Feries])

End Sub

Message d'erreur :

Erreur d’exécution '13' :

incompatibilité de type

Me.lblMessage = Application.NetworkDays_Intl(Me.txtDateDebut, Me.txtDateFin, 11, [Feries])

Bonne journée,

Cordialement.

Bonjour,

Ajoutez "CDate" pour vos valeurs de textebox, car un textbox c'est du "string" et non pas une date...

CDate(Me.txtdatedebut)

@ bientôt

LouReeD

Bonjour LouReed,

Merci pour l'information, cela fonctionne parfaitement.

Bonne journée,

Cordialement.

Merci pour vos remerciements !

@ bientôt

LouReeD