Menu deroulant et redirection - VB/VBA/VBS - Programmation
Marsh Posté le 18-01-2006 à 14:07:25
salut,  
 
select case combobox1.text 
case "joe" 
sheets"joe".Select 
case ..... 
 
end select 
 
sinon ca marche aussi avec les if
Marsh Posté le 18-01-2006 à 17:12:38
Salut, 
 
il me semble que ça marche mieux avec des parenthèses et puis pour afficher la page, préfère activate à select. 
 
sheets("joe" ).activate 
 
ça donne donc 
 
private sub combobox1_change() 
on error resume next 
sheets(combobox1.text).activate 
end sub 
 
Marsh Posté le 18-01-2006 à 20:14:40
J ai fait du if then et.. en effet il faut des parentheses! 
 
et pis j ai fait un ptit userform pour que l'ergonomie du truc soit plus evidente  
 
 
merci pour votre aide 
Marsh Posté le 06-02-2006 à 09:31:07
Bonjour 
J'ai longtemps chercher comme toi à ce probleme. 
maintenant heureux d'avoir trouver je te fait part de ma solution "tres simple": 
 
Private Sub ComboBox1_Change() 
X = ComboBox1.Value 
Sheets(X).Select 
End Sub 
 
J'espére été assez clair  
  
Marsh Posté le 18-01-2006 à 13:50:22
Salut à tous!
 )  Y a cinq choix et pour chaque choix je souhaite modifier la page affichée.
 )  Y a cinq choix et pour chaque choix je souhaite modifier la page affichée. 
 
 
 
 
Bon voilà mon problème: sous excel j ai crée un menu deroulant (assez mediocre d'ailleurs car les seuls choix proposés doivent être dans la même feuille
Pour me simplifier la vie, j'ai créé cinq feuilles dans le meme classeur excel et je cherche donc à rediriger l'utilisateur vers la feuille portant le meme nom que la case du menu deroulant.
Je suis pas tres clair donc je vais donner un exemple
ex: le menu deroulant affiche "joe", on redirige vers la feuille "joe"
Evidemment je vais faire un if then etc... (c'est bien lourd mais bon au moins ca marche)
mais mais mais je ne connais pas la fonction pour rediriger vers une feuille ni l'appelation d'une feuille excel sous vb.
Merci d'avance pour votre aide