Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 VBA - Liste déroulante Ruban personnalisé

lemath87

XLDnaute Nouveau
Bonjour à tous,

Voici mon problème... Je viens d'utiliser le logiciel Custom UI Editor afin de personnaliser le ruban d'un fichier. Dans ce ruban, je souhaite intégrer une liste déroulante reprenant les 12 mois de l'année. Jusque là pas de problème, je me suis débrouillé pour le faire avec le logiciel précité.

Seulement, je souhaite qu'en fonction du mois sélectionné, il m'ouvre un onglet précis (par exemple, je sélectionne "Janvier" dans ma liste déroulante du ruban, je veux qu'il m'ouvre l'onglet "Janvier").

J'encode le code VBA suivant :

Sub LISTE_MOIS(control As IRibbonControl, text As String)
If LISTE_MOIS.Value = "Janvier" Then
Sheets("Janvier").Select
End If

Mais il ne fonctionne pas... Débutant en VBA, je ne sais que faire, hormis me tourner vers vous...
 

13GIBE59

XLDnaute Accro
Re : VBA - Liste déroulante Ruban personnalisé

Je pars du principe que ta feuille (ton onglet) est masquée. Comme la liste de ta combobox comporte les noms des onglets, je compose :
Sheets(le nom de ton onglet) , = le texte qui apparaît dans ta combo.
Visible = true : pour la "démasquer"
Select : pour la sélectionner.

CQFD
 

Discussions similaires

Réponses
4
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…