Ouvrir classeur en plein écran.

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

alexandre33260

XLDnaute Occasionnel
Bonjour, je cherche le code VBA pour ouvrir un classeur non pas en plein écran, mais prenant l'intégralité de l'écran comme quand on clic sur l’icône des doubles fenêtres en haut à droite, entre réduire et fermer fenêtre.
Comme code j'ai :

Private Sub Workbook_Open()
Sheets("Synthèse").Activate
Application.DisplayFullScreen = False
End Sub

Pour ne pas afficher le classeur en plein écran et je remplace False par True pour l'ouvrir en plein écran, mais je n'ai pas la soluce pour afficher mon classeur avec le bandeau et tout le reste mais en prenant l'intégralité de l'écran.
Merci pour votre aide.

PS : Je débute en VBA...
 
Re : Ouvrir classeur en plein écran.

Bonsoir,

Pour revenir à l'affichage normal utilise la touche "Echap".

Sinon, lance l'enregistreur de macro et effectue des selections dans les options Excel, tu auras le codage correspondant de tes manipulations.

Cordialement,
 
Re : Ouvrir classeur en plein écran.

La question n'est pas celle là.
Lorsque l'on quitte Excel avec un certain format de fenêtre, (plaqué à droite, ou à gauche, fenêtre personnalisée, etc..) lorsque l'on réouvre Excel, la fenêtre est de la même mise en forme que lorsque l'on a quitté Excel....
Je voudrais juste avoir le code pour ouvrir excel prenant tout l'écran mais avec les bandeaux....
 
Re : Ouvrir classeur en plein écran.

Bonsoir,

Si j'ai bien compris, tu veux sortir du plein écran à la fermeture du fichier. Tu utilises l'evenement "BeforeClose" dans "Thisworbook".
Code:
Option Explicit
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.DisplayFullScreen = False
End Sub

Private Sub Workbook_Open()
    Application.DisplayFullScreen = True
End Sub
J'espère que c'est ce que tu veux.
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
577
Réponses
5
Affichages
1 K
Retour