Bonjour à tous,

Nouveau sur le forum et sur VBA, je suis bloqué sur un point important de mon code. Dans mon userform je cherche à partir de la réponse en combobox7 à retrouver une ou plusieurs valeurs en combobox8 (des valeurs qui sont dans une colonne excel dans mon cas Range("B2:B" & lastrow)). Merci d'avance pour votre retour, voici le code =

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
Private Sub ComboBox7_Change()
 
Dim lastrow As Long
Dim C As String
 
ComboBox8.Clear
With Sheets("Feuil1")
 
lastrow = Range("B" & Rows.Count).End(xlUp).Row
 
C = combobox7.Value
 
 ComboBox8.List = Range("B2:B" & lastrow).Find(what:=C, LookIn:=xlValues).Value
 
End With
 
End Sub