Discussion :

[SuperKiwi]

Bonjour à tous,

Après des recherches infructueuses, je vous demande un peu d'aide pour réaliser la tache suivante :
A l'activation d'un onglet (donc Private SubWorksheet_Activate() sur l'onglet en question), je souhaiterais peupler une Zone de Liste Déroulante (CBModelFournisseur).
Le peuplement doit être sans Doublons, non vide ET dynamique.
Dynamique dans le sens où la ligne de début de peuplement est fixe mais celle de fin non (du genre un :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range(cells(LigneDebut , ColFournisseur),cells(Cells(rows.count , ColFournisseur).End(xlUp).Row , ColFournisseur))

)
Soit un peuplement sur la colonne "ColFournisseur" et entre les lignes LigneDebut et la dernière.

En enregistrant tout simplement l'action cela donne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
ActiveSheet.Shapes.Range(Array("CBModelFournisseur")).Select
    With Selection
        .ListFillRange = "PRODUITS!$A$1:A$100"
        .LinkedCell = "MODELISATION!$C$3"
    End With

Cela pourrait le faire sans problème en variabilisant mon ListFillRange.
Malheureusement je ne vois pas comment effectuer la suppression des cellules vides et des doublons SANS passer par la création d'une feuille cachée.

S'il existe une autre solution plus élégante à votre connaissance je suis preneur.

J'ai l'habitude de faire des remplissages de ComboBox sur Userforms mais je n'ai jamais effectué cela sur une feuille de calcul Excel.
Et je trouve ça bien plus compliqué

Merci d'avance pour votre aide.
Cdt,
Martin

[Qwazerty]

Salut

Si tu as l'habitude de le faire sur une UserForm, le mieux est d'utiliser une liste déroulante Activx sur ta feuille Excel. Dans la partie développeur du menu Excel, lorsque tu ajoutes un contrôle, tu as le choix entre les contrôles formulaire ou activeX.
Une fois le contrôle ajouté, dans VBa tu vas sur la feuille qui contient ce contrôle et tu retrouveras celui-ci avec toutes les procédures habituelles (dans les listes déroulantes de la fenêtre d'édition).

Après il existe pas mal de discussions disponibles sur DVP pour faire un tri sans doublon en utilisant un tableau.

++
Qwaz