Ne pas appliquer grand écran sur une feuille

bonjour,

j'ai cette macro qui fonctionne bien ,j'aimerais savoir comment la modifier pour qu'elle ne s'applique pas à la feuille Logos

je vous remercie

Sub Macro3()
'
If Application.DisplayFullScreen Then
    Application.DisplayFullScreen = False
 Else
    Application.DisplayFullScreen = True
    Application.DisplayFormulaBar = False

End If
End Sub

Bonjour Joco,

Vous pouvez vérifier le nom de la feuille active en début de Sub, et quitter le sub si c'est la feuille logo.

Sub Macro3()
  If Activesheet.Name = "Logos" Then Exit Sub

  If Application.DisplayFullScreen Then
      Application.DisplayFullScreen = False
  Else
      Application.DisplayFormulaBar = False
  End If

End Sub

Re Bonjour

J'ai mis le code dans le ThisWorkbook cela ne fonctionne pas ,je précise que la feuille Logos n'est pas masquée

Ah mais attendez, je crois que j'avais mal compris. J'ai adapté votre macro pour qu'elle ne se lance pas si vous etes sur la feuille Logos.

Si vous voulez quitter le mode plein écran quand vous activez la feuille Logos, il faut une autre macro.

Ci-dessous, le code à ajouter dans le code de la feuille logos :

Private Sub Worksheet_Activate()
  Application.DisplayFullScreen = False
End Sub

Private Sub Worksheet_Deactivate()
  Application.DisplayFullScreen = True
End Sub

Le second (Deactivate) est pour repasser en fullscreen quand vous quittez la feuille. Si non nécessaire, le supprimer.

Merci cela correspond bien à mes besoins

A+