Excel Downloads
Forum

Précédent   Excel Downloads Forums > Excel > Questions les plus fréquentes (FAQ) et didacticiels > [VBA]Remplir une combobox sans doublon
Vous inscrire
S'inscrire FAQ Membres Calendrier Recherche Messages du jour Marquer les forums comme lus


Réponse
 
LinkBack Outils de la discussion
Vieux 23/10/2007, 21h05   #1 (permalink)
FAQ XLD
XLDnaute Nouveau
 
Date d'inscription: septembre 2007
Messages: 16
Par défaut [VBA]Remplir une combobox sans doublon

Pour remplir une combobox sans doublon et simplement, placer ce code dans le code de l'userform concerné

Dans l'exemple, il faut remplir la combobox1 avec les données de la colonne A de la feuille "Base".

Code:
Private Sub UserForm_Initialize()

Dim i As Integer

For i = 1 To Sheets("Base").Range("A65536").End(xlUp).Row
  ComboBox1 = Sheets("Base").Range("A" & i)
  If ComboBox1.ListIndex = -1 Then ComboBox1.AddItem Sheets("Base").Range("A" & i)
Next i

End Sub
__________________________________________________ ___________
Merci à Spitnolan08 et Staple1600 pour leur participation

Dernière modification par PascalXLD 24/10/2007 à 08h28.
FAQ XLD est déconnecté   Réponse avec citation
ANNONCES
Réponse



Outils de la discussion

Règles de messages
Vous pouvez ouvrir de nouvelles discussions : nonoui
Vous pouvez envoyer des réponses : nonoui
Vous pouvez insérer des pièces jointes : nonoui
Vous pouvez modifier vos messages : nonoui

Les balises BB sont activées : oui
Les smileys sont activés : oui
La balise [IMG] est activée : oui
Le code HTML peut être employé : non
Trackbacks are oui
Pingbacks are oui
Refbacks are oui


Discussions similaires
Discussion Auteur Forum Réponses Dernier message
Alim Combobox avec condition sans doublon xvella Forum Excel 4 05/04/2007 21h57
remplir combobox sans doublon Cora Forum Excel 4 18/05/2006 15h26
remplir combobox sans doublon Cora Forum Excel 2 18/05/2006 11h30
Liste sans doublon, sans blanc, sous condition Ludo Forum Excel 0 25/01/2006 16h58
Combobox sans doublon Temjeh Forum Excel 3 23/04/2005 00h42


Fuseau horaire GMT +2. Il est actuellement 01h01.


(C) 2006 Excel Downloads