Bouton afficher /masquer plein ecan
Bonsoir,
je veux que lorsque je clic sur masquer
et ensuite clic sur bouton "enregistrer et quitter"
je vois que les autres classeurs qui reste ouverts
ne soit pas en plein ecran
dans thisworkbook j'ai mis
Private Sub Workbook_BeforeClose(Cancel As Boolean)
supprimPleinEcran
End Sub
j'ai mis une macro en genrale
Public Sub supprimPleinEcran()
Application.DisplayScrollBars = False
Application.DisplayFullScreen = True
ActiveWindow.DisplayGridlines = False
ActiveWindow.DisplayWorkbookTabs = False
ActiveWindow.DisplayHeadings = False
End Sub
et dans thisworbook
Private Sub Workbook_BeforeClose(Cancel As Boolean)
supprimPleinEcran
End Sub
voir fichier joint
mais sans rezultat