Ok. Mettons que dans la colonne P, les lignes remplies correspondant à la combobox sont les lignes 1, 2, 4 et 5. Vous voulez quoi dans la textbox 3 ?
Comme déjà demandé mettez votre fichier en ligne. Là vous m'obligez à tout refaire qui plus est, on ne peut pas copier votre code puisque vous avez placé une image
EDit :
Essayez ceci
Private Sub CommandButton1_Click()
Dim h As Worksheet
Dim i As Byte, b As Byte
If ComboBox4 = "" Then Exit Sub
Set h = Worksheets("Toto")
With h
For i = 1 To 5
On Error Resume Next
b = .Range("P" & i).Find(ComboBox4.Value, LookIn:=xlValues, lookat:=xlWhole).Row
If b > 0 Then Controls("Textbox" & i) = .Range("P" & i): b = 0
Next i
End With
End Sub
cela placera un résultat dans la textbox correspondant à la ligne (donc ici de 1 à 5)