Menu dans excel

cyberdico · 9 Juin 2017

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

reinruof77 · 9 Juin 2017

Bonjour
regarde dans le vba de la feuil "menu"

chezswan · 9 Juin 2017

Bonsoir,

Regarde si ça te conviens.En fait, tu clic droit et tu attribue un lien hypertext.

A plus

DoubleZero · 10 Juin 2017

Bonjour à toutes et à tous,

Une autre possibilité :

Code:

Option Explicit
Private Sub Worksheet_Change(ByVal c As Range)
    If c.Address = "$C$8" Then Sheets(c.Value).Activate
End Sub

A bientôt

DoubleZero · 11 Juin 2017

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 · 11 Juin 2017

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

cyberdico · 13 Juin 2017

Bonjour Merci,

C'est un peu ce que je cherchais. Par contre, je me demandais si c'était possible d'Avoir une menu déroulant qui une fois que nous avons choisi l'Article, nous amène sur l'onglet du dit article.

Merci encore une fois

Menu dans excel

cyberdico

XLDnaute Nouveau

Pièces jointes

reinruof77

XLDnaute Occasionnel

Pièces jointes

chezswan

XLDnaute Occasionnel

Pièces jointes

DoubleZero

XLDnaute Barbatruc

DoubleZero

XLDnaute Barbatruc

DoubleZero

XLDnaute Barbatruc

cyberdico

XLDnaute Nouveau

Discussions similaires