Bonjour,
A mettre dans le module VBA "ThisWorkbook" :
Private Sub Workbook_Open()
Application.CommandBars(1).Enabled = False 'Barre de commande
Application.DisplayFullScreen = True 'Affichage plein écran
Application.DisplayFormulaBar = False 'Barre de formule
Application.DisplayStatusBar = False 'Barre d'état
Application.ActiveWindow.DisplayHeadings = False 'En-têtes de lignes/colonnes
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars(1).Enabled = True
Application.DisplayFullScreen = False
Application.DisplayFormulaBar = True
Application.DisplayStatusBar = True
Application.ActiveWindow.DisplayHeadings = True
End Sub
Je t'invite à supprimer/mettre en commentaire les lignes de code qui ne t'intéressent pas.
A+