Calcul d'heures dans un UserForm

Bonsoir à tous,

Dans le fichier joint, trouvé sur internet pour avoir accès à l'userform3, Cliquez sur " ACCES FORMUMAIRE....", ensuite "Gestion Salariés", qui nous donne accès à l'UserForm3.

Dans cette UserForm, la TextBox8 qui devrais me donner le nombre d'heures faites dans l'année en se référent à la cellule H3 de la feuille "Salariés".

Petit problème je ne réussit pas à avoir le bon total. Pourriez-vous m'aider?

Merci par avance,

Djodjo

Bonsoir

Faites ceci :

- Supprimez la macro Private Sub TextBox8_Change()
- Modifiez le code ci-dessous

Private Sub ListBox1_Click()
' Liste des salariés
Dim Ligne As Long
Dim I As Integer
with Me
  Ligne = .ListBox1.ListIndex + 3
  For I = 1 To 7
    .Controls("TextBox" & I) = Ws.Cells(Ligne, I)
  Next I
  .TextBox8 = Ws.Cells(Ligne, 8).Text
  .CommandButton1.Caption = "Modifier"
  .CommandButton3.Visible = True
End with      ' Bouton supprimer
End Sub

Dans la Sub InitListBox(), mettez aussi un point devant ROWS.COUNT --> .Range("A" & .Rows.Count).End(xlUp).Row

Si ok, merci de cloturer le fil en clquant sur le petit v en haut à droite

Cordialement