bonjour à tous,
Voila j'ai un petit soucis, je souhaiterais , selon la valeur dans une combobox,, soit ouvrir et sélectionner la valeur présente dans une colonne présente dans une autre feuille, soit dans le cas ou la valeur de la combobox n'existe pas dans la colonne lancer un userform dans une autre feuille encor. Pour cela j'utilise la méthode if-then-else, mais cela me lance les deux solution en même temps. voila mon code:
Private Sub CommandButton3_Click()
BDD.Select
If IsNull(Usf.ComboBox1) Then
MsgBox "Vous devez sélectionner un équipement."
Usf.ComboBox1.SetFocus
Exit Sub
End If
With BDD
For i = 7 To .Range("B" & Rows.Count).End(xlUp).Row
If .Cells(i, 2) = Usf.ComboBox1.Value Then
Cells(i, 2).Select
Else: MsgBox "Equipement introuvable"
ajout.Visible = True
ajout.Select
creer.Show
Exit For
End If
Next i
End With
Unload Usf
End Sub
BDD et ajout sont des feuilles et créer est une userform, avez vous une idée de la source de mon problème?
Merci d'avance
cordialement
max