Bonjour,

J'ai créé un menu avec la macro auto_open et je voudrais que quand je ferme ma feuille (auto_close) mon menu disparaisse et je n'y arrive pas

Merci de votre aide

Création du menu
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Set myMenuBar = CommandBars.ActiveMenuBar
    Set newmenu = myMenuBar.Controls.Add(Type:=msoControlPopup, _
        Temporary:=True)
    newmenu.Caption = "Ouvre fiche"
    Set ctrl1 = newmenu.Controls _
        .Add(Type:=msoControlButton, ID:=1968)
    ctrl1.Caption = "Ouvre le dossier"
    ctrl1.TooltipText = "Ouvre le dossier de la fiche"
    ctrl1.Style = msoButtonCaption
    ctrl1.OnAction = "Ouvre_lien"
Nota : comment faire pour ajouter une ligne séparatrice ?

Merci