Listes de validation

GeoTrouvePas

XLDnaute Impliqué

• 7 Juillet 2011

• #2

Re : Listes de validation

Bonjour,

Je passe toujours par des userform et jamais par des contrôles "directement sur feuilles" mais si ça peut t'aider, j'utilise ceci pour alimenter mes combobox :

Code:

With ThisWorkbook.Sheets("Feuil1").Range("Maplage")
    Set MonDico = CreateObject("Scripting.Dictionary")
    For i = 2 To .Rows.Count
        If .Item(i, 1) <> "" then MonDico(.Item(i, 1).Value) = .Item(i, 1)
    Next
        Combo1.List = MonDico.Items
End With

L'utilisation du dictionnaire et de ses clés permet de supprimer facilement les doublons.

 

Dernière édition: 7 Juillet 2011

Vote positif 0 Vote négatif

CISCO

XLDnaute Barbatruc

• 7 Juillet 2011

• #3

Re : Listes de validation

Bonjour à tous, bonjour GeoTrouvepas et C@thy

Une possibilité en pièce jointe.

@ plus

 

Pièces jointes

• essai liste validation doublons et blancs.xls

  19.5 KB · Affichages: 37
• essai liste validation doublons et blancs.xls

  19.5 KB · Affichages: 38
• essai liste validation doublons et blancs.xls

  19.5 KB · Affichages: 38

Vote positif 0 Vote négatif

C@thy

XLDnaute Barbatruc

• 7 Juillet 2011

• #4

Re : Listes de validation

Pfiou! Cisco! Les jolies formules que voilà!!

Et en plus, c'est exactement ça!!!

Bravo à toi et mille mercis

C@thy

 

Vote positif 0 Vote négatif

CISCO

XLDnaute Barbatruc

• 7 Juillet 2011

• #5

Re : Listes de validation

Rebonjour

Les jolies formules, les jolies formules... Si je ne me trompe, c'est Monique qui a "banalisé" ce type de formule sur le forum il y a déja quelques années de cela. Donc, merci Monique...

@ plus

 

Vote positif 0 Vote négatif

C@thy

XLDnaute Barbatruc

• 7 Juillet 2011

• #6

Re : Listes de validation

Incroyable! Tu lis dans mes pensées! Oui, bien sûr, je pensais à Monique et aussi à Ti, Jean-Marie puis Tibo et toi, et d'autres encore ont assuré la relève.

Merci encore BarbaMonique, qui se fait si rare, mais qui revient en ce moment pour notre plus grand plaisir

Bises

C@thy

 

Dernière édition: 8 Juillet 2011

Vote positif 0 Vote négatif

M

Monique

Nous a quitté

Repose en paix

• 7 Juillet 2011

• #7

Re : Listes de validation

Bonjour,

Merci à vous

Sans blanc en fin de liste de validation, cette fois

 

Pièces jointes

• Essai-liste-validation-doublons-blancsV1.xls

  29 KB · Affichages: 55

Vote positif 0 Vote négatif

C@thy

XLDnaute Barbatruc

• 7 Juillet 2011

• #8

Re : Listes de validation

De mieux en mieux!

Merci Monique 🙂

Très utile ces listes de validation!

 

Vote positif 0 Vote négatif

C@thy

XLDnaute Barbatruc

• 7 Juillet 2011

• #9

Re : Listes de validation

Euh... Monique, j'ai juste un 'tit truc : si je veux remonter Noms3 de J2 à J8 avec le titre en en J1,
ListeJ ne marche plus... 🙁

Edit : Oups! Je viens de voir : tu as dit laisser J1 vide... désolée...😱

C@thy

 

Dernière édition: 7 Juillet 2011

Vote positif 0 Vote négatif

C@thy

XLDnaute Barbatruc

• 7 Juillet 2011

• #10

Re : Listes de validation

Bon, j'ai traficoté le truc en donnant le nom Liste E à la formule
=DECALER(Feuil1!$E$2;;;NB.SI(Feuil1!$E2:$E8;"><"&""))

Bises

C@thy

 

Vote positif 0 Vote négatif