Cacher le ruban Excel même après réduction du fichier

[MyMy1988]

Bonjour, je recherche un code qui permet de masquer le ruban excel et les contours du fichier même en cas de réduction du fichier .

Actuellement j'ai un code qui permet de masquer le ruban Excel à l'ouverture du fichier mais dès que je le réduis puis le réagrandi le ruban et les contours se réactivent !

Voici le code :

Private Sub Workbook_WindowActivate(ByVal Wn As Window)
'--- active ce classeur, met en plein écran ---
Application.DisplayFullScreen = True
ActiveWindow.DisplayHeadings = False
ActiveWindow.DisplayWorkbookTabs = False
End Sub

Pouvez-vous m'aider s'il vous plait

Merci d'avance

 

[Philippe_JOCHMANS]

Bonjour

Essaies de mettre aussi ton code sur l'évènement WindowResize pour voir.

C'est juste une idéé pas testée.

Philippe

 

[bof]

Bonjour,
Utilise ce modèle
A+

 

[Philippe_JOCHMANS]

Bonjour,

Je trouve que dans ce cas ce serait mieux de mettre le code utilisé qu'un classeur joint.
Pensez aux personnes qui ne peuvent télécharger des classeurs exemples en raison des restrictions à leur travail.

Philippe

 

[bof]

Je trouve que dans ce cas ce serait mieux de mettre le code utilisé qu'un classeur joint.

En fait ce n'est pas vraiment un solution VBA : Le classeur est édité dans Custom UI Editor et n'offre aucun menu.
Il est conçu pour une appli "propriétaire" et ne permet que la sauvegarde. (oupa...)
Seul subsistent quelques menus faciles à inhiber. (Cells...) et quelques raccourcis Windows.
Nécessité de le programmer et de l'éditer depuis VBA...
Le code :

Option Explicit
Private Sub Workbook_BeforeClose(Cancel As Boolean)
   Application.DisplayFullScreen = False
End Sub
Private Sub Workbook_Open()
   Application.DisplayFullScreen = True
End Sub
Private Sub Workbook_WindowResize(ByVal Wn As Window)
   Application.DisplayFullScreen = True
End Sub

A+