N
Nico74
Guest
Bonjor, je souhaiterais savoir comment faire pour qu'à l'ouverture d'un fichier xl, toutes les barres d'outils, la barre d'etat, la barre de formule ainsi que les onglets soient cacher ?
D
Dan
Guest
Bonsoir,
Voici une macro qui fera ce que tu demandes.
Sub Auto_open()
'
'Macro à l'ouverture du fichier - Suppression des barre de menus, taches, formules et onglets
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Formatting").Visible = False
With Application
.DisplayFormulaBar = False
.DisplayStatusBar = False
End With
ActiveWindow.DisplayWorkbookTabs = False
End Sub
Attention, si tu refermes ton fichier il faut rester propre surtout pour ceux qui devront l'ouvrir. Par exemple, si tu partage ton fichier ou que tu l'envoies à quelqu'un d'autre, il pourrait perdre tous ces menus à l'ouverture du fichier et en conséquence changer interface de travail Excel.
Moi je te conseille de créer également une macro Auto_close() qui réutilisera les mêmes instructions et dans laquelle tu remplaceras "False" par "True".
Bon travail
A+
Dan
Voici une macro qui fera ce que tu demandes.
Sub Auto_open()
'
'Macro à l'ouverture du fichier - Suppression des barre de menus, taches, formules et onglets
Application.CommandBars("Standard").Visible = False
Application.CommandBars("Formatting").Visible = False
With Application
.DisplayFormulaBar = False
.DisplayStatusBar = False
End With
ActiveWindow.DisplayWorkbookTabs = False
End Sub
Attention, si tu refermes ton fichier il faut rester propre surtout pour ceux qui devront l'ouvrir. Par exemple, si tu partage ton fichier ou que tu l'envoies à quelqu'un d'autre, il pourrait perdre tous ces menus à l'ouverture du fichier et en conséquence changer interface de travail Excel.
Moi je te conseille de créer également une macro Auto_close() qui réutilisera les mêmes instructions et dans laquelle tu remplaceras "False" par "True".
Bon travail
A+
Dan
Discussions similaires
- Résolu(e)
