OVH Cloud OVH Cloud

liste déroulantes

6 réponses
Avatar
dom
Bonjour,

Sous excel2000, j'aimerais récupérer la valeur contenue dans mes différentes
listes déroulantes dans d'autres cellules sachant que c'est de l'alphabétique
et non du numérique au niveau des listes déroulantes ? Est-ce possible sans
faire une macro ?

Merci pour vos réponses


Cordialement

Dominique

6 réponses

Avatar
anonymousA
Bonjour,

qu'est ce que tu appelles liste déroulante: des listboxes, des
comboboxes de Données/validation.? Dans les 2 cas, ces éléments ne
se sont pas remplis tout seul. Ila bien fallu que tu en indiques la
source à un moment donné, auquel cas tu sais comment les récupérer.
Par ailleurs, quel rapport avec alphabétique et numérique ?

A+
Avatar
dom
re-salut

En fait,je ne suis pas propriétaire du fichier. C'est quelqu'un qui me l'a
envoyé.
Les listes déroulantes ont été créée avec la barre d'outil formulaire avec
pas de cellule liée lorsque je regarde le format de contrôle. La plage source
est sur une autre feuille appelé contrôles.
J'ai plein de listes déroulantes avec des valeurs alphabétiques de définies.
Je voudrais extraire le contenu de ces listes déroulantes ?

J'espère que c'est plus clair.

Merci pour vos réponses
Cordialement
Dominique


Bonjour,

qu'est ce que tu appelles liste déroulante: des listboxes, des
comboboxes de Données/validation.? Dans les 2 cas, ces éléments ne
se sont pas remplis tout seul. Ila bien fallu que tu en indiques la
source à un moment donné, auquel cas tu sais comment les récupérer.
Par ailleurs, quel rapport avec alphabétique et numérique ?

A+




Avatar
anonymousA
Ben, c'est plus clair mais si ces listes déroulante est sur une autre
feuille appelée controles qu'est ce qui t'empêche de récupérer ces
fameuses valeurs sur cette feuille ?

A+

re-salut

En fait,je ne suis pas propriétaire du fichier. C'est quelqu'un qui me l'a
envoyé.
Les listes déroulantes ont été créée avec la barre d'outil formulaire avec
pas de cellule liée lorsque je regarde le format de contrôle. La plage source
est sur une autre feuille appelé contrôles.
J'ai plein de listes déroulantes avec des valeurs alphabétiques de définies.
Je voudrais extraire le contenu de ces listes déroulantes ?

J'espère que c'est plus clair.

Merci pour vos réponses
Cordialement
Dominique



Bonjour,

qu'est ce que tu appelles liste déroulante: des listboxes, des
comboboxes de Données/validation.? Dans les 2 cas, ces éléments ne
se sont pas remplis tout seul. Ila bien fallu que tu en indiques la
source à un moment donné, auquel cas tu sais comment les récupérer.
Par ailleurs, quel rapport avec alphabétique et numérique ?

A+






Avatar
dom
re-salut

Je suis d'accord avec toi mais j'ai plus de 100 listes déroulantes avec des
valeurs différentes à chaque fois. Donc , c'est un peu fastidieux.
N'y aurait-il pas un autre moyen ?

Cordialement

Dominique


Ben, c'est plus clair mais si ces listes déroulante est sur une autre
feuille appelée controles qu'est ce qui t'empêche de récupérer ces
fameuses valeurs sur cette feuille ?

A+

re-salut

En fait,je ne suis pas propriétaire du fichier. C'est quelqu'un qui me l'a
envoyé.
Les listes déroulantes ont été créée avec la barre d'outil formulaire avec
pas de cellule liée lorsque je regarde le format de contrôle. La plage source
est sur une autre feuille appelé contrôles.
J'ai plein de listes déroulantes avec des valeurs alphabétiques de définies.
Je voudrais extraire le contenu de ces listes déroulantes ?

J'espère que c'est plus clair.

Merci pour vos réponses
Cordialement
Dominique



Bonjour,

qu'est ce que tu appelles liste déroulante: des listboxes, des
comboboxes de Données/validation.? Dans les 2 cas, ces éléments ne
se sont pas remplis tout seul. Ila bien fallu que tu en indiques la
source à un moment donné, auquel cas tu sais comment les récupérer.
Par ailleurs, quel rapport avec alphabétique et numérique ?

A+









Avatar
anonymousA
Bon, pour ce que j'ai pu tout à fait comprendre de ta demande, je te
propose la chose suivante. Ici tu récupères l'intégralité de ce
qu'il y a dans une liste déroulante appelée cbtoto créée par la
barre d'outils formulaires.Evidemment tu peux remplacer le Msgbox par
une autre instruction si tu veux stocker les valeurs .


For I = 1 To ActiveSheet.Shapes("cbtoto").ControlFormat.ListCount
MsgBox ActiveSheet.Shapes("cbtoto").ControlFormat.List(I)
Next

Si tu as plus d'une liste déroulante et que tu veux faire une boucle
sur l'ensemble de ces listes

For Each S In ActiveSheet.shapes
With S
If .Type = msoFormControl then
If .FormControlType = 2 Then
For I = 1 To .ControlFormat.ListCount
MsgBox .ControlFormat.List(I)
Next
End if
End if
End with
Next

A+
Avatar
dom
Re-salut

Merci pour les infos.

Et joyeux noël


Bon, pour ce que j'ai pu tout à fait comprendre de ta demande, je te
propose la chose suivante. Ici tu récupères l'intégralité de ce
qu'il y a dans une liste déroulante appelée cbtoto créée par la
barre d'outils formulaires.Evidemment tu peux remplacer le Msgbox par
une autre instruction si tu veux stocker les valeurs .


For I = 1 To ActiveSheet.Shapes("cbtoto").ControlFormat.ListCount
MsgBox ActiveSheet.Shapes("cbtoto").ControlFormat.List(I)
Next

Si tu as plus d'une liste déroulante et que tu veux faire une boucle
sur l'ensemble de ces listes

For Each S In ActiveSheet.shapes
With S
If .Type = msoFormControl then
If .FormControlType = 2 Then
For I = 1 To .ControlFormat.ListCount
MsgBox .ControlFormat.List(I)
Next
End if
End if
End with
Next

A+