Remplissage zone de liste qui est sur une feuille Excel

J

JHA

XLDnaute Barbatruc

• 5 Mars 2014

• #2

Re : Remplissage zone de liste qui est sur une feuille Excel

Bonjour à tous,

A essayer, liste sans doublon rattachée à la zone de liste

JHA

 

Pièces jointes

• Classeur (Liste déroulante).xlsm

  90.3 KB · Affichages: 23

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 5 Mars 2014

• #3

Re : Remplissage zone de liste qui est sur une feuille Excel

Bonjour richter90, Bonjour JHA

En utilisant une zone de liste déroulente Contrôle Active X (PAS formulaire)

VB:

Private Sub ComboBox1_GotFocus()
Dim i&, Dico As Object, TData As Variant
Set Dico = CreateObject("scripting.dictionary")
With Sheets("Feuil4")
    TData = .Range(.Cells(2, 1), .Cells(.Rows.Count, 1).End(3))
End With
For i = LBound(TData, 1) To UBound(TData, 1)
    Dico(TData(i, 1)) = ""
Next i
ComboBox1.List = Dico.Keys
End Sub

Cordialement

 

Pièces jointes

• Classeur_1.xls

  519 KB · Affichages: 31
• Classeur_1.xls

  519 KB · Affichages: 28
• Classeur_1.xls

  519 KB · Affichages: 28

Dernière édition: 5 Mars 2014

Vote positif 0 Vote négatif

R

richert90

XLDnaute Occasionnel

• 5 Mars 2014

• #4

Re : Remplissage zone de liste qui est sur une feuille Excel

Bonjour,

Merci pour la réponse

Une dernière question:
En VBA, comment je peux faire pour avoir dans une variable par exemple, la valeur choisie dans la zone de liste?

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 5 Mars 2014

• #5

Re : Remplissage zone de liste qui est sur une feuille Excel

Re
Si la question est pour moi:

VB:

Private Sub ComboBox1_Click()
MsgBox ComboBox1.Text
End Sub

Cordialement

 

Vote positif 0 Vote négatif

R

richert90

XLDnaute Occasionnel

• 5 Mars 2014

• #6

Re : Remplissage zone de liste qui est sur une feuille Excel

Ok merci

Pourquoi tu préfères utiliser les controles active X plutôt que les formulaires ?

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 5 Mars 2014

• #7

Re : Remplissage zone de liste qui est sur une feuille Excel

Re
Parce qu'avec les contrôles formulaires tu n'as pas de gestion d'évennements (seulement une et une seule macro liée)
Cordialement

 

Vote positif 0 Vote négatif

R

richert90

XLDnaute Occasionnel

• 5 Mars 2014

• #8

Re : Remplissage zone de liste qui est sur une feuille Excel

D'accord!
Merci

 

Vote positif 0 Vote négatif

R

richert90

XLDnaute Occasionnel

• 6 Mars 2014

• #9

Re : Remplissage zone de liste qui est sur une feuille Excel

Re,

Cette question (la même que la précédente) mais dans le cas des contrôles formulaires: En VBA, comment je peux faire pour avoir dans une variable par exemple, la valeur choisie dans la zone de liste? .
Je sais avec Efgé comment faire cela mais dans le cas des contrôles active X

Merci d'avance,

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 6 Mars 2014

• #10

Re : Remplissage zone de liste qui est sur une feuille Excel

Bonjour richert90, JHA, le fil, le forum
Pour le contrôle formulaire, il faut utiliser la proposition de JHA (une plage variable de cellule sans doublons.
Clic droit sur la zone / Format de contrôle / Onglet Contrôle / Cellule liée (choisir une cellule)
Cela renverra dans la cellule choisie l'index de la zone.
Pour retrouver quelle valeur est choisie, utiliser une formule du type:
=INDEX(Liste; D13;1)
(voir le classeur joint, fait avec celui de JHA)

Voila aussi pourquoi je préfère les contrôles Active X

Cordialement

 

Pièces jointes

• Liste-richert(2).xls

  522.5 KB · Affichages: 28

Vote positif 0 Vote négatif

R

richert90

XLDnaute Occasionnel

• 6 Mars 2014

• #11

Re : Remplissage zone de liste qui est sur une feuille Excel

Ok Merci pour la réponse Efgé.
En effet c'est beaucoup moins pratique d'utiliser les controles formulaires rien que pour récupérer la valeur.. enfin c'est quand même faisable quand on a un traitement assez simple.

 

Vote positif 0 Vote négatif