Resultat dans un userform

Bonjour, malgré des recherches sur le forum, je continue de galérer sur l'affichage dans un label du resultat d'une commande.

Le problème se situe dans le userform "MouvementCompte". Je pense qu'il y en a qui ont déjà eu ce genre de problèmes.

Je joins le fichier pour plus d'informations.

Merci par avance,

PS : si quelqu'un arrive également à m'aider à faire fonctionner le userform ModifierMvt je veux bien.

Bonne journée à tous !!

Bonjour Skrax, bonjour le forum,

Une TextBox renvoie une donnée de type String. Pour la comparer avec la valeur d'une cellule il faut qu'elle ait le même type :

Private Sub Valider_Click()
Dim numero_compte As String

numero_compte = numcompte.Value
For i = 7 To Range("A55555").End(xlUp).Row
    If CStr(Sheets("AR").Cells(i, 2).Value) = numero_compte Then
        Resultat.Caption = Resultat.Caption & Sheets("AR").Cells(i, 1) & "   " & Sheets("AR").Cells(i, 2).Value & "   " & Sheets("AR").Cells(i, 3).Value & vbCrLf
    End If
Next i
End Sub

ou :

Private Sub Valider_Click()
Dim numero_compte As long

numero_compte = CLng(numcompte.Value)
For i = 7 To Range("A55555").End(xlUp).Row
    If Sheets("AR").Cells(i, 2).Value = numero_compte Then
        Resultat.Caption = Resultat.Caption & Sheets("AR").Cells(i, 1) & "   " & Sheets("AR").Cells(i, 2).Value & "   " & Sheets("AR").Cells(i, 3).Value & vbCrLf
    End If
Next i
End Sub

Je te conseille la première option. Mais, franchement, une Label pour ça ?... Une Listbox serait bien plus adaptée...

Ok je vais faire une listebox alors

Merci beaucoup en tout cas thautem