Comment afficher une page Excel en plein écran sans la barre de menu au dessus ?

Dans la feuille de code ThisWorkbook

Private sub Workbook_Open()
 Dim cmdB As CommandBar
  For Each cmdB In Application.CommandBars
    cmdB.Enabled = False
  Next cmdB
 ' si tu veux masquer en plus la barre d'état
 ' la barre de formule
 ' les onglets...
  With Application
    .DisplayFullScreen = True
    .DisplayStatusBar = False
    .DisplayFormulaBar = False
  End With
  With ActiveWindow
    .DisplayWorkbookTabs = False
    .DisplayHeadings = False
  End With
 
 end sub

puis les remettre à la fermeture du classeur

Private sub Workbook_BeforeClose(Cancel As Boolean)
 Dim cmdB As CommandBar
  For Each cmdB In Application.CommandBars
    cmdB.Enabled = True
  Next cmdB
  With Application
    .DisplayFullScreen = False
    .DisplayStatusBar = True
    .DisplayFormulaBar = True
  End With
  With ActiveWindow
    .DisplayWorkbookTabs = True
    .DisplayHeadings = True
  End With
 end sub