XL 2016 Masquer Barre de Formule

KTM

XLDnaute Impliqué
Salut chers Tous

Je voudrais masquer la barre de formule dans mon classeur a l'ouverture et la réafficher a la fermeture.
Le soucis c'est que tous les autres classeurs sont affectés.
Comment faire pour que seul le classeur en question soit concerné?

Voici les codes utilisés

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFormulaBar = True
End Sub

Private Sub Workbook_Open()
Application.DisplayFormulaBar = False
End Sub
 

Pièces jointes

  • BarreFormule.xlsm
    13.7 KB · Affichages: 7

Hasco

XLDnaute Barbatruc
Repose en paix
Bonjour,

A tester : Mettez vos instructions dans Workbook_Activate et Deactivate:
VB:
Private Sub Workbook_Activate()
Application.DisplayFormulaBar = False
End Sub

Private Sub Workbook_Deactivate()
Application.DisplayFormulaBar = True
End Sub

Cordialement
 

Discussions similaires