Affiche de BO perso

[Sylvain]

bonjour à tous,

Je n'arrive pas à afficher ma barre perso en plein écran, je n'ai aucune erreur elle ne s'afiche pas : voici mon code dans thisworkbook et la commande workbook_open:

Application.CommandBars(1).Enabled = False
'si tu veux afficher ta barre
Application.CommandBars("boperso").Visible = True
Application.DisplayFullScreen = True
Application.DisplayFormulaBar = False
Application.DisplayStatusBar = False


Merci

Sylvain