Menu dans excel

cyberdico

XLDnaute Nouveau
Bonjour à tous,

Comme je suis vraiment nul en VBA et que vous êtes drôlement efficace. Je vous expose mon problème.
J'Aimerais avoir un menu à l'ouverture qui présente des boutons et des listes déroulantes.
Le bouton Nouvelle recette créerait une copie de l'onglet recette de base(Par exemple une nouvelle vinaigrette) et une fois que celle serait complété. J'aimerais que cet onglet s'Ajoute à ma liste déroulante présente au menu de démarrage.

Aussi dans la liste déroulante du menu, j'aimerais que si par exemple je sélectionne Ketchup qu'Excel m'amène sur l'onglet Ketchup.

Je vous ai joint une copie du fichier afin de vous montrer l'idée derrière mais je ne sais pas si c'Est jouable.
Si vous avez des questions, n'hésitez surtout pas et merci encore une fois pour votre éternelle collaboration!

Cyberdico
 

Pièces jointes

  • recettes.xlsx
    10.6 KB · Affichages: 48

DoubleZero

XLDnaute Barbatruc
Bonjour à toutes et à tous,

En cas d'erreur, il est préférable d'utiliser le code suivant :
Code:
Option Explicit
Private Sub Worksheet_Change(ByVal c As Range)
    On Error GoTo fin
    If c.Address = "$C$8" Then Sheets(c.Value).Activate
    Exit Sub
fin: MsgBox "Onglet inexistant.": c.Select
End Sub
A bientôt :)
 

DoubleZero

XLDnaute Barbatruc
Bonjour à toutes et à tous,

En cas d'erreur, il est préférable d'utiliser ce code :
VB:
Option Explicit
Private Sub Worksheet_Change(ByVal c As Range)
    On Error GoTo fin
    If c.Address = "$C$8" Then Sheets(c.Value).Activate
    Exit Sub
fin: MsgBox "Onglet inexistant.": c.Select
End Sub
A bientôt :)
 

Discussions similaires

Statistiques des forums

Discussions
312 188
Messages
2 086 026
Membres
103 099
dernier inscrit
myseb