Pein Écran - Écran Normal [Résolu]

kingfadhel

XLDnaute Impliqué

• 4 Janvier 2018

• #2

Bonjour, le forum,
@Magic_Doctor

 

Pièces jointes

• Plein Ecran - Ecran Normal.xlsm

  25.2 KB · Affichages: 24

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 4 Janvier 2018

• #3

Bonjour kingfadhel,

Merci beaucoup pour votre aide.
J'avais essayé un peu toutes les combinaisons, mais pas celle-là.
Le problème demeure :
j'ouvre le fichier --> plein écran.
je ferme aussitôt le fichier et le réouvre --> écran normal

Une très bonne journée méditerranéenne.

 

Dernière édition: 4 Janvier 2018

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 4 Janvier 2018

• #4

Bonjour Magic_Doctor, kingfadhel,

Le bouton n'est pas indispensable, voyez le fichier joint et les codes retouchés.

PS : je rappelle que les touches Ctrl+N ou Ctrl+O permettent d'ouvrir un autre document ou fichier.

A+

 

Pièces jointes

• Plein Ecran - Ecran Normal(1).xlsm

  24.9 KB · Affichages: 21

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 4 Janvier 2018

• #5

Re,

Une fois le fichier ouvert, si l'on veut changer son état, on lancera cette macro :

Code:

Sub Etat()
'se lance par Ctrl+E
If ActiveWorkbook.Name <> ThisWorkbook.Name Then Exit Sub
VueEcran = Application.DisplayFullScreen
ChangeEtat
End Sub

Toujours sans bouton...

Fichier (2).

Remarque : il n'est pas indispensable de déclarer Public la variable VueEcran.

Il suffirait de la passer en argument de la macro ChangeEtat

A+

 

Pièces jointes

• Plein Ecran - Ecran Normal(2).xlsm

  26.4 KB · Affichages: 26

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 4 Janvier 2018

• #6

Bonjour job,

Nickel comme d'habitude,
Le problème, c'est que je voulais conserver ce bouton (qui fout la pagaille...) pour pouvoir, le cas échéant, passer en un simple clic en mode écran normal.
Est-ce possible ?

PS : TabRatio qu'est-ce que c'est exactement ?

 

Dernière édition: 4 Janvier 2018

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 4 Janvier 2018

• #7

Re,

Puisque tu tiens à ton bouton utilise ce fichier (3), moi je n'aime pas trop...

TabRatio c'est le ratio d'occupation des onglets dans la barre du bas.

Chez moi (Excel 2013) il faut le modifier pour que l'onglet s'affiche quand on passe à l'état "normal".

A+

 

Pièces jointes

• Plein Ecran - Ecran Normal(3).xlsm

  29.7 KB · Affichages: 27

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 4 Janvier 2018

• #8

Re,

J'avais mis 2 macros dans le fichier (3) mais en fait une seule suffit.

A+

 

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 4 Janvier 2018

• #9

Merci job, c'est ce que je cherchais.

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Janvier 2018

• #10

Bonjour Magic_Doctor,

Pour tenir compte des conclusions de ce fil :

https://www.excel-downloads.com/threads/occulter-ou-faire-apparaître-la-barre-détat.169324/

j'ai très simplement adapté le code dans ce fichier (4).

Edit : dans le module Macros on pourrait n'utiliser qu'une seule macro paramétrée avec comme arguments les 6 critères, mais ce serait moins compréhensible.

A+

 

Pièces jointes

• Plein Ecran - Ecran Normal(4).xlsm

  29.7 KB · Affichages: 19

Dernière édition: 7 Janvier 2018

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

Supporter XLD

• 8 Janvier 2018

• #11

On y sera enfin arrivés !
Encore merci job.

 

Vote positif 0 Vote négatif