Liste déroulante combobox
dan7966
Messages postés
1
Statut
Membre
-
dan7966 -
dan7966 -
Bonjour,
je suis en train de faire un petit catalogue.
quand j'ouvre mon classeur excel, j'ouvre en meme temp une userform avec une liste modifiable dans une combobox.j'ai mis dans ma liste modifiable des valeurs que je récupères de la feuil1 du genre ;
cellule A1 : pince
cellule A2 : tournevis
cellule A3 : Marteau
ensuite j'ai créer sur la feuil2 la fiche technique de la Pince
sur la Feuil3 la fiche technique du tournevis
sur la feuil4 la fiche technique du Marteau
je voudrais quand je clic sur ma liste déroulante et que je sélectionne le marteau, aller directement sur la feuil4 et si je sélectionne le tournevis, aller directement sur la feuil3.
comment je dois procéder ?
je suis en train de faire un petit catalogue.
quand j'ouvre mon classeur excel, j'ouvre en meme temp une userform avec une liste modifiable dans une combobox.j'ai mis dans ma liste modifiable des valeurs que je récupères de la feuil1 du genre ;
cellule A1 : pince
cellule A2 : tournevis
cellule A3 : Marteau
ensuite j'ai créer sur la feuil2 la fiche technique de la Pince
sur la Feuil3 la fiche technique du tournevis
sur la feuil4 la fiche technique du Marteau
je voudrais quand je clic sur ma liste déroulante et que je sélectionne le marteau, aller directement sur la feuil4 et si je sélectionne le tournevis, aller directement sur la feuil3.
comment je dois procéder ?
A voir également:
- Liste déroulante combobox
- Liste déroulante excel - Guide
- Liste déroulante en cascade - Guide
- Liste code ascii - Guide
- Liste déroulante google sheet - Accueil - Guide bureautique
- Site dangereux liste - Guide
3 réponses
Bonjour,
Il faut utiliser les dans les codes du Userform l'évènement:
Private Sub ComboBox1_Change()
If combobox1.value="Pince" then
sheets("Pinces").select
else if ...
...
end if
End Sub
Rem: Il est plus conseillé d'utiliser un switch qu'un if then
Il faut utiliser les dans les codes du Userform l'évènement:
Private Sub ComboBox1_Change()
If combobox1.value="Pince" then
sheets("Pinces").select
else if ...
...
end if
End Sub
Rem: Il est plus conseillé d'utiliser un switch qu'un if then
