fermeture plein écran

[cmarleau]

Bonjour excellien (ne)

Juste un petit éclaircissement, Est-il normal que lorsque je quitte le classeur que le mode plein écran demeure par défault pour les autres apllications, malgré la procédure de fermeture
Code d'ouverture utilisé:

Private Sub Workbook_Open()
With Application
.WindowState = xlMaximized
.DisplayFullScreen = True
End With
With ActiveWindow
.WindowState = xlMaximized
.DisplayHeadings = False
End With
End Sub



Pour La Fermeture :
Code:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFullScreen = False
End Sub