Discussion :

[moi244]

Bonjour,
Voilà, je sais comment mettre la valeur d'un combobox dans une cellule donnée, mais comment je ferais pour chercher la valeur du combbox dans la colonne A et mettre la valeur du textbox dans la cellule à droite du la valeur qui correspond au combobox.
En résumé;

cherche combobox1 dans A, Combobox1 se trouve dans A7, met la valeur de textbox1 dans B7.

Merci beaucoup.

[moi244]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Dim i As Integer, numlign As Integer
numlign = Sheets("Database").Range("A65536").End(xlUp).Row
    With Sheets("Database")
    For i = 1 To numlign
    If .Cells(i, 1).Value = UserForm1.ComboBox1 Then
    .Cells(i, 2).Offset(0, 1).Value = TextBox3
    Exit For
    End If
    Next
 
    End With