Utiliser combobox excel VBA
Résolu/Fermé
leeks
Messages postés
54
Date d'inscription
mercredi 11 mars 2009
Statut
Membre
Dernière intervention
5 janvier 2012
-
3 oct. 2011 à 15:51
leeks Messages postés 54 Date d'inscription mercredi 11 mars 2009 Statut Membre Dernière intervention 5 janvier 2012 - 4 oct. 2011 à 14:11
leeks Messages postés 54 Date d'inscription mercredi 11 mars 2009 Statut Membre Dernière intervention 5 janvier 2012 - 4 oct. 2011 à 14:11
A voir également:
- Utiliser combobox excel VBA
- Liste déroulante excel - Guide
- Formule excel - Guide
- Déplacer une colonne excel - Guide
- Find vba - Astuces et Solutions
- Aller à la ligne excel - Guide
1 réponse
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
15 mars 2023
2 712
3 oct. 2011 à 16:04
3 oct. 2011 à 16:04
Bonjour,
Avec un code dans ce style :
Un exemple de UserForm
Avec un code dans ce style :
Private Sub ComboBox1_Change()
'déclaration des variables
Dim i As Integer
If comboBox1 = "" Then Exit Sub
'recherche de la ligne ou figure le NOM (combobox1) dans la feuille "bdd"
With Sheets("bdd")
i = .Columns(1).Cells.Find(ComboBox1).Row
'renvoie la valeur des cellules 1 à 5 dans les différents controles de l'USF
UserForm1.TextBox1 = .Cells(i, 1)
UserForm1.ComboBox2 = .Cells(i, 2)
UserForm1.TextBox4 = .Cells(i, 6)
UserForm1.TextBox3 = .Cells(i, 3)
If .Cells(i, 9) = "oui" Then
UserForm1.CheckBox1.Value = True
End If
End With
End Sub
Un exemple de UserForm
4 oct. 2011 à 14:11
Cdrlmnt