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

cacher la barre des menus

D

Dehoust

Guest
Bonjour au forum

Comment faire pour que la première action dans l'exécution d'un programme VBA l'écran n'affiche plus ni la barre de titre, ni la barre des menus ni les barres d'outils éventuelles et que, par conséquent, il ne soit plus possible d'atteindre les déprotections de feuilles ni l'éditeur de macros et donc de modifier le programme.

merci pour votre aide

jean-pierre
 
L

lea

Guest
Bonjour,

Tu inclues le code suivant dans un module

Sub Autpen()

Dim Cmdb As CommandBar
For Each Cmdb In CommandBars
Cmdb.Enabled = False
Next Cmdb
Application.DisplayFormulaBar = False
End

Petit problème, il ne faut pas oublier de quitter le fichier sans remettre les barres

Dim Cmdb As CommandBar
For Each Cmdb In CommandBars
Cmdb.Enabled = True
Next Cmdb
Application.DisplayFormulaBar = True
End

Sinon elles n'apparaîtront plus à la prochaine ouverture

Léa
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…