Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Alimenter comboBox d'une userform a partir d'une feuille du classeur

  • Initiateur de la discussion Initiateur de la discussion Youpsy
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Y

Youpsy

Guest
Bonjour a tous !!
j'ai un petit problemeet je n'ai pas une grande notion de programmation...
Ce que je voudrai réussir a faire est à alimenter mes combobox qui sont sur l'userform1 depuis
la feuilles "LISTES" qui regroupe toutes les données..

Merci d'avance 🙂
 

Pièces jointes

Re : Alimenter comboBox d'une userform a partir d'une feuille du classeur

C'est presque parfait !
La seul remarque c'est que quand j'agrandi la plage ou sont selectionné mes données elle sont comblée par un vide...
Sinon déjà un grand merci !
Code:
Private Sub UserForm_Initialize()
With ComboBox1
    .List = Sheets(4).Range("B2:B10").Value
    .MatchRequired = True
End With
With ComboBox2
    .List = Sheets(4).Range("H2:H10").Value
    .MatchRequired = True
End With
End Sub
 
Re : Alimenter comboBox d'une userform a partir d'une feuille du classeur

oui le vide c'est normal puisqu'on fait référence à des cellules vides
mais il y a peut être moyen de sélectionner large en retenant seulement les cellules non vides
tout doit se situer dans la ligne .list
un petit génie du forum doit bien avoir ça sous le coude !
 
Re : Alimenter comboBox d'une userform a partir d'une feuille du classeur

bonsoir à tous
effectivement dans le lien de Pierrot93 il y a la solution pour ne faire apparaître que les cellules occupées dans le comboBox

merci Pierrot
 
Re : Alimenter comboBox d'une userform a partir d'une feuille du classeur

perso j'ai choisi celle là (et ça marche):

Dim Plage As Range
With Sheets("nom de ta feuille") ' à personnaliser
Set Plage = .Range("A2:A" & .Range("A65536").End(xlUp).Row) 'liste se trouvant dans la colonne A à partir de la seconde ligne
End With

ComboBox1.List = Plage.Value
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
6
Affichages
321
Réponses
38
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…