Excel VBA - Remplir une combobox avec le nom d une colonne

leuleu90 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,

Je souhaite remplir une ComboBox avec une colonne d'un fichier excel. Pour cela, je veux utiliser le nom d'une feuille et le nom d'une colonne comme paramètres pour ma ligne de commande. Quelqu'un peut-il m'aider? Voici ce que j'ai déjà essayer mais qui n'a pas marcher:

1.

ComboBox1.List = Worksheets("Liste déroulante").RowSource("Genre").Value


2.

ComboBox1.List = Application.Transpose(Worksheets("Liste déroulante").Range("Genre"))


Merci d'avance pour vos réponses.

leuleu90

2 réponses

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Si "Grenre": de A1 a A10
Private Sub UserForm_Activate()
    ComboBox1.List() = Worksheets("Liste déroulante").Range("Genre").Value
End Sub


Si "Genre": de A1 a J1
Private Sub UserForm_Activate()
    ComboBox1.List() = Application.Transpose(Worksheets("Liste déroulante").Range("Genre").Value)
End Sub
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Bonjour f894009,

Une autre possibilité :
ComboBox1.RowSource = Application.Names("Genre").RefersTo
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713 > pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention  
 
Bonjour,

Ca roule ??
0
leuleu90 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

Merci pour vos réponses, malheureusement aucunes de vos solutions n'ont fonctionnées. L'erreur 1004 apparaît à chaque fois. J'espère que pourrez me faire avancer dans mon projet.

Meilleures salutations
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
@f894009 : yop! ça roule. Et toi?

@leuleu90 : les solutions proposées ici ont toutes été testées avec succès.
Tu dois t'y prendre mal.
Le nom peut être mal orthographié, par exemple...

Si tu ne trouves pas, il faudra faire passer ton classeur, sans donnéees confidentielles, en utilisant https://www.cjoint.com/
0