Excel plein écran

Résolu
Signaler
Messages postés
693
Date d'inscription
samedi 18 mai 2002
Statut
Membre
Dernière intervention
17 avril 2017
-
Messages postés
693
Date d'inscription
samedi 18 mai 2002
Statut
Membre
Dernière intervention
17 avril 2017
-
Bonjour,


Quand l'utilisateur change de feuille, la feuille appellée se met automatiquement en mode plein écran par Application.DisplayFullScreen = True dans la procédure Workbook_SheetActivate.
Jusque là tout va bien, ce que je souhaite est ceci : si l'utilistateur appelle le menu affichage pour vouloir repasser en mode écran normal je voudrais que la feuille reste en plein écran.
Comment intercepter l'évènement du menu de façon à forcer le plein écran ? ou bien y-a-t'il un autre moyen ?.
Je ne souhaite pas supprimer l'entrée Plein écran du menu Affichage.


Merci pour votre aide,


Amicalement de Cheyenne

2 réponses

Messages postés
693
Date d'inscription
samedi 18 mai 2002
Statut
Membre
Dernière intervention
17 avril 2017
2
J'ai trouvé une solution, qui ne supprime pas l'entrée du menu 'Plein écran' mais qui inhibe le menu 'Affichage' :



Application.CommandBars("View").Enabled = False

Evidement, à remmettre à True avant de quitter dans Workbook_BeforeClose.

Merci quand même,

Cheyenne
Messages postés
693
Date d'inscription
samedi 18 mai 2002
Statut
Membre
Dernière intervention
17 avril 2017
2
Oups, il n'y a qu'un m à remettre.