double liste déroulante

[zebulon]

Bonjour,
Je rentre dans un tableau des cotes de livres pour une bibliothèque. ces cotes sont composées d'une thématique principale (par exemple, biologie) et des sous-thématiques (ex, animaux). J'ai créé une liste déroulante pour les thématiques mais par commodité, je souhaiterais que la liste déroulante des sous-thématiques associées à la thématique principale s'affiche dans la cellule suivante.
Par exemple quand je choisis la thématique "biologie", la cellule suivante n'affiche que "animaux, végétaux, cellule,...". Par contre si je choisis la thématique "5 sens", dans la cellule voisine je ne peux choisir que "öuîe, vue, toucher, odorat, goût".
Merci beaucoup de votre aide

 

[yvon51]

bonjour
essaie cela
yvon51

 

[Anynoor]

Bonsoir Zebulon et le forum,

J'ai fait un petit essai, dis-moi si c'est ce que tu souhaites ou pas ?

A+
Anynoor

 

[zebulon]

c'est exactemet ça.

Merci beaucoup !

 

[zebulon]

c'est exactement ça.
mais au fait, comment as-tu fait ?
C'est super d'avoir la solution, mais si je suis capable de le refaire et de l'adapter c'est encore mieux !

Merci de ton aide !

 

[Anynoor]

Bonjour zebulon et à vous tous,


De quelle solution veux-tu avoir ? la mienne ou celle d'Yvon51 ?

Si c'est la mienne, alors sans problème, je te donne la solution.


A+

Anynoor

 

[Zebulon]

Salut Aynoor,

En fait, je suis intéressé par les eux, car elles conviennent toutes les 2 à mon poblème, ma ta solution me semble encore meilleure.
Donc si tu peux m'expliquer, je serais ravi !

Merci,

Zebulon

 

[zebulon]

Bonjour,
En décorticant ton fichier test, j'ai compris comment tu faisais (avec la fonction INDIRECT). Par contre, dans ton test, quand tu sélectionnes dans la cellule de gauche "biologie", automatiquement dans la cellule voisine, les sous-thématiques liées à "biologie" s'affiche!
Et çà, je n'arrive pas à le faire, comment tu fais?
Merci!

 

[Anynoor]

Bonjour et bonne année à toutes et à tous,

Tu as bien compris la fonction pour INDIRECT, concernant ta question j'ai un peu triché car j'ai essayé un truc sur VBA voici le code :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$2" Then
[B2] = Range("ST" & [A2]).Item(1)
End If

End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$2" _
Or Target.Address = "$B$2" _
Or Target.Address = "$C$2" _
Then Application.SendKeys "%{down}"
End Sub


Si tu cliques dans le menu, Outils, Macro, Visual Basi Editor, tu le verras.

A+
Anynoor

 

[Funbou]

Salut,

je trouve ton code interessant mais est ce que tu pourrai me dire comment le faire avec 2 feuille car moi je boss sur un truc ou je dois gere 2 feuille la feuille 1 ou il y a les listes deroulantes et l'autre feuille ou il y a les infos qui me permet de faire la liste deroulantes merci.

 

[Jessica]

Bonjour,
Je cherche à faire exactement ce que Anynoor a fait dans son fichier test.zip mais je ne m'y connais absolument pas en Visual Basic.J'ai recopié assez bêtement ce qu'il avait fait mais la liste de ma sous-thématique ne marche pas, je ne sais pas pourquoi...est-ce que quelqu'un pourrait y jeter un coup d'oeil et me dire ce qui cloche ???
Un grand merci d'avance car je ne maitrise absolument pas le sujet !