bonjour j'ai réalisé une macro qui fait appel à une UserForm GénéalogieChèvre (simple deux textBox et un bouton)
Txtbox1 : N°Animal (enabled = true )
Txtbox 2 : N°Mère mes variables dans la macro fonctionnent correcttement jusqu'au passage vers l'Userfom et là je ne comprends plus très bien?!

module 1

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
If réponse = vbYes Then
    fin = False
    GénéalogieChèvre.N°Animal.ControlSource = Worksheets _
                                                             ("T_Chèvre2").Cells(a, 3).Value
    GénéalogieChèvre.Show
End If
UserForm
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub Validation_Click()
If Worksheets("T_Chèvre2").Cells(a, 3).Value = "" Then
    fin = True
End If
If N°Mère.Value = "" Then
    Worksheets("T_Chèvre2").Cells(j, 2).Value = "XXX" & k
    k = k + 1
ElseIf Len(N°Mère.Value) <> 10 Then
    MsgBox ("erreur dans la saisie")
    N°Mère.Value = ""
Else: Worksheets("T_Chèvre2").Cells(j, 2).Value = GénéalogieChèvre.N°Mère.Value
End If
j = j + 1
a = a + 1
GénéalogieChèvre.N°Animal.ControlSource = Worksheets _
                                                            ("T_Chèvre2").Cells(a, 2).Value
GénéalogieChèvre.N°Mère.Value = ""
End Sub
a et j sont déclarer en général dans le module1 et fin et k dans les déclarations général de l'userform

si quelqu'un peux essayer d'y jeter un oeil et de m'expliquer ce qui ne va pas ça m'enléverait une épine du pied