OVH Cloud OVH Cloud

zone de liste

5 réponses
Avatar
jacqueline.zerini
Bonjour,

J'ai une zone de liste déroulante venant de la barre d'outils formulaires.J'
y ai entré des noms qui correspondent à des noms de feuilles.
Comment en sélectionnant un nom dans cette liste puis-je arriver à la
feuille correspondante ?
Je n'ai pas trouvé la macro.
J'ai XP, Excel 2003

Merci beaucoup
Jacqueline

5 réponses

Avatar
isabelle
bonjour Jacqueline,

à copier dans un module standard,

si la cellule lier est la cellule B1 sinon modifier au besoin.

Sub Zonecombinée1_QuandChangement()
Sheets([B1]).Activate
End Sub

isabelle


Bonjour,

J'ai une zone de liste déroulante venant de la barre d'outils formulaires.J'
y ai entré des noms qui correspondent à des noms de feuilles.
Comment en sélectionnant un nom dans cette liste puis-je arriver à la
feuille correspondante ?
Je n'ai pas trouvé la macro.
J'ai XP, Excel 2003

Merci beaucoup
Jacqueline


Avatar
Nicolas B.
Salut,

Dans Format de contrôle de ta liste, tu choisis dans l'onglet Contrôle la
cellule liée de ton choix (par exemple B1) et la plage d'entrée (A1:A10).

Puis tu associes une macro telle que celle-ci :

Sub VisiterFeuille()
Sheets([index(A1:A10,B1)].Value).Select
End Sub

Mais ça serait peut-être plus simple d'untiliser un ComboBox de la barre
d'outils Contrôles.


A+
--
Nicolas B.


jacqueline.zerini nous a écrit
dans le message ccmdcf$864$ :
Bonjour,

J'ai une zone de liste déroulante venant de la barre d'outils
formulaires.J' y ai entré des noms qui correspondent à des noms de
feuilles.
Comment en sélectionnant un nom dans cette liste puis-je arriver à la
feuille correspondante ?
Je n'ai pas trouvé la macro.
J'ai XP, Excel 2003

Merci beaucoup
Jacqueline


Avatar
AV
S'il s'agit d'une "Combobox" (Zone de Liste Modifiable de la barre d'outils
Formulaire)
Affecte lui cette macro (clic droit dessus..) - Une ligne de code
Sheets(ActiveSheet.DropDowns("LeNomDeLaComboBox").List(Sheets("LeNomDeLaFeuille"
).DropDowns("LeNomDeLaComboBox").ListIndex)).Select

S'il s'agit d'une "ListBox" (Zone de Liste de la barre d'outils Formulaire)
Affecte lui cette macro (clic droit dessus..) - Une ligne de code
Sheets(ActiveSheet.ListBoxes("LeNomDeLaListBox").List(Sheets("LeNomDeLaFeuille")
.ListBoxes("LeNomDeLaListBox").ListIndex)).Select

PS : Bien sur, au préalable et comme tu sembles le dire, la "liste" a été
initialisée avec les noms des feuilles du classeur
AV
Avatar
boblebob
salut,

je t'ai envoyé un fichier joint d'exemple dans ta BAL.
pour affecter une macro à une liste déroulante : clic droit sur la
liste/affecter une macro (dans mon exemple elle s'appelle Ouvrir)

--
A+

Bob
----

"jacqueline.zerini" a écrit dans le message
de news:ccmdcf$864$
Bonjour,

J'ai une zone de liste déroulante venant de la barre d'outils
formulaires.J'

y ai entré des noms qui correspondent à des noms de feuilles.
Comment en sélectionnant un nom dans cette liste puis-je arriver à la
feuille correspondante ?
Je n'ai pas trouvé la macro.
J'ai XP, Excel 2003

Merci beaucoup
Jacqueline




Avatar
Nicolas B.
Salut Isabelle,

Ton truc, ça ne marche qu'à moitié : la cellule liée renvoit l'index de la
valeur sélectionnée. Avec un peu de chance ces index collent avec ceux des
feuilles, mais ce n'est pas forcément le cas...


A+
--
Nicolas B.


isabelle nous a écrit
dans le message :
bonjour Jacqueline,

à copier dans un module standard,

si la cellule lier est la cellule B1 sinon modifier au besoin.

Sub Zonecombinée1_QuandChangement()
Sheets([B1]).Activate
End Sub

isabelle


Bonjour,

J'ai une zone de liste déroulante venant de la barre d'outils
formulaires.J' y ai entré des noms qui correspondent à des noms de
feuilles.
Comment en sélectionnant un nom dans cette liste puis-je arriver à la
feuille correspondante ?
Je n'ai pas trouvé la macro.
J'ai XP, Excel 2003

Merci beaucoup
Jacqueline