ComboBox: Valeur à afficher à partir d'une plage défini par nom

[Résolu/Fermé]
Signaler
-
 xaveria -
Bonjour,

J'ai un formulaire qui se trouve dans une feuille de mon classeur Excel (feuil1), et toutes les listes de choix que je veux avoir sont dans une autre feuille (feuil3). Toutes ces listes ont des noms définis dans mon classeur.

Dans mon formulaire, je veux avoir une liste déroulante de choix, donc j'ai utilisé le ComboBox, mais je n'arrive pas à faire afficher les valeurs voulues lorsque je clique sur la flèche de la liste dans le formulaire. Je ne suis pas certaine de l'évènement à choisir pour y arriver. La liste reste vide.

Voici ce qui se trouve présentement dans le code:
Private Sub cbxSecteur_change()

Dim ChoixSecteurs As String
ChoixSecteurs = Feuil3.Range("Secteurs").Value

CbxSecteur.Rowsource = ChoixSecteurs

End Sub


1 réponse

Messages postés
16034
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 octobre 2021
1 548
Bonjour,

J'ai un formulaire qui se trouve dans une feuille de mon classeur Excel (feuil1) Userform ou controls sur feuille de calcul ???????
Messages postés
16034
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 octobre 2021
1 548
Re,

CbxSecteur.RowSource = Worksheets("feuil3").Range("Secteurs").Address

Ne marche pas, c'est pour cela que je ne l'avais pas mis,mais en passant par une variable intermediare c'est ok, comme quoi !!!

Private Sub UserForm_Click()
x = Worksheets("feuil1").Range("liste").Address
ComboBox1.RowSource = x
End Sub

A+
Messages postés
16034
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 octobre 2021
1 548
Bonjour,

Ai oublie le nom de la feuille:
ex:
Private Sub UserForm_Activate()
x = "feuil3!" & Worksheets("feuil3").Range("liste2").Address
ComboBox1.RowSource = x
End Sub
Dans tous les cas, lorsque j'arrive dans le formulaire et que je clique sur la flèche pour avoir la liste, c'est vide.
Messages postés
16034
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 octobre 2021
1 548
Re,

pouvez-vous mettre votre fichier (sans donnees confidentielles) sur https://www.cjoint.com/

n'oubliez pas de copier/coller le lien cree dans votre prochain message

A defaut un exemple:

https://www.cjoint.com/?CItqAfDwzmB

A+
Merci beaucoup pour l'exemple! Ce qui ne fonctionnait pas c'était que Feuil3 c'est nom VBA de la feuille et non le nom que je lui avais donné dans Excel.
J'ai pu corriger le tout et mes listes apparaissent!