Afficher valeurs d'une colonne dans la comboBox d'un formulaire
Izou3165
Messages postés
19
Date d'inscription
Statut
Membre
Dernière intervention
-
Izou3165 Messages postés 19 Date d'inscription Statut Membre Dernière intervention -
Izou3165 Messages postés 19 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai créée un formulaire de consultation. Je souhaiterais qu'à l'ouverture du formulaire, dans une combobox, il s'affiche les données d'une colonne présente sur une autre feuille.
mais après avoir effeuillé les aides sur le net et essayer divers codes, je bloque.
Merci d'avance pour votre aide!
Izou3165
J'ai créée un formulaire de consultation. Je souhaiterais qu'à l'ouverture du formulaire, dans une combobox, il s'affiche les données d'une colonne présente sur une autre feuille.
mais après avoir effeuillé les aides sur le net et essayer divers codes, je bloque.
Merci d'avance pour votre aide!
Izou3165
A voir également:
- Afficher valeurs d'une colonne dans la comboBox d'un formulaire
- Whatsapp formulaire opposition - Guide
- Déplacer une colonne excel - Guide
- Trier une colonne excel - Guide
- Formulaire de réclamation facebook - Guide
- Colonne word - Guide
9 réponses
Merci pour ta réponse, mais cela ne fonctionne pas.
Mon tableau est dans une autre feuille, je l'appelle avec With Sheets("aa"). et après j'arrive pas à récupérer les données présentes dans la colonne A, à partir de la ligne 8) de cette feuille; et de tout lister dans ma fameuse combo box!
Mon tableau est dans une autre feuille, je l'appelle avec With Sheets("aa"). et après j'arrive pas à récupérer les données présentes dans la colonne A, à partir de la ligne 8) de cette feuille; et de tout lister dans ma fameuse combo box!
en suivant l'exemple donné:
voilà!
Private Sub UserForm_Initialize()
Dim j As Integer
Sheets("aa").Select
'Récupère les données de la colonne A...
For j = 8 To Range("A65536").End(xlUp).Row
ComboBox1 = Range("A8" & j)
'...et filtre les doublons
If ComboBox1.ListIndex = -1 Then ComboBox1.AddItem Range("A" & j)
Next j
ComboBox1.ListIndex = 0
End Sub
voilà!
Erreur '380'
Impossible de définir la propriété Listindex. Valeur de propriété non valide
AHHHHHHHHHHHHHHH
Impossible de définir la propriété Listindex. Valeur de propriété non valide
AHHHHHHHHHHHHHHH
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
On ne nous dit pas tout!!!!!!!!!!!!!!
sans les tenants et aboutissants, on va dans le mur!
Private Sub UserForm_Initialize()
Dim j As Integer
Sheets("Base_de_donnees").Visible = True
Sheets("Base_de_donnees").Select
'Récupère les données de la colonne A...
For j = 8 To Range("A65536").End(xlUp).Row
ComboBox1 = Range("A8" & j)
'...et filtre les doublons
If ComboBox1.ListIndex = -1 Then ComboBox1.AddItem Range("A" & j)
Next j
ComboBox1.ListIndex = 0
Sheets("Base_de_donnees").Visible = False
End Sub
sans les tenants et aboutissants, on va dans le mur!
Ca fonctionne merci!!
Mais je me rend compte qu'avec cette logique, je n'arrive pas à mon aboutissant qui est, lors de la sélection de cette fameuse ligne, je clique sur OK et "normalement" des données doivent s'afficher ,des cases se cocher en fonction du contenu de la ligne.
mais merci beaucoup!!!
Mais je me rend compte qu'avec cette logique, je n'arrive pas à mon aboutissant qui est, lors de la sélection de cette fameuse ligne, je clique sur OK et "normalement" des données doivent s'afficher ,des cases se cocher en fonction du contenu de la ligne.
mais merci beaucoup!!!
Dans le lien que je t'ai donné, il y a cela:
donc en fonction de la ligne cliqué, c'est a toi de mettre le code qui correspond!
si combobox1.Value = "toto" alors
je mets "bonjour" sur la ligne 4 et je coche cette ligne
fin de si
pour avoir le code qui correspond, sers-toi de l'enregistreur de macro en faisant exactement ce que tu veux.
voilà
Private Sub CommandButton1_Click()
MsgBox ComboBox1.Value
End Sub
donc en fonction de la ligne cliqué, c'est a toi de mettre le code qui correspond!
si combobox1.Value = "toto" alors
je mets "bonjour" sur la ligne 4 et je coche cette ligne
fin de si
pour avoir le code qui correspond, sers-toi de l'enregistreur de macro en faisant exactement ce que tu veux.
voilà
En fait c'est beaucoup plus compliqué.
J'ai mi sen place un formulaire à remplir avec différents cases text, des check box et optionbutton. Lorsque le formulaire est rempli, les données sont reportées sur le ligne de la fameuse feuille Base de donnees.
Le but de ce second formulaire est de lire ces données avec un nouveau formulaire quasi identique au premier, qui n'a la vocation que de consultation. En venant chercher la réf d'un objet ça vient renseigner tous le champs (checkbox textbox et optionbutton).
COmpliqué hihihhi
J'ai mi sen place un formulaire à remplir avec différents cases text, des check box et optionbutton. Lorsque le formulaire est rempli, les données sont reportées sur le ligne de la fameuse feuille Base de donnees.
Le but de ce second formulaire est de lire ces données avec un nouveau formulaire quasi identique au premier, qui n'a la vocation que de consultation. En venant chercher la réf d'un objet ça vient renseigner tous le champs (checkbox textbox et optionbutton).
COmpliqué hihihhi