Occulter ou faire apparaître la barre d'état

Magic_Doctor

XLDnaute Barbatruc
Bonsoir,

Quand on est en plein écran, la barre des tâches (enfin, celle qui est tout en bas) disparaît.
J'essaie de la faire réapparaître (toujours en mode "Plein écran"), mais sans succès.
J'ai tenté en écrivant : Application.StatusBar.Visible = True
et ça n'a pas marché.

Quelle est la bonne syntaxe ?

Merci d'avance pour toute réponse.
 

Fred0o

XLDnaute Accro
Re : Occulter ou faire apparaître la barre de tâches

Bonsoir,

En cochant l'option "Masquer automatiquement la barre des taches" après avoir fait un clic-droit sur celle-ci, tu la verras.

Au cas où, tu peux exécuter cette commande :
VB:
    Application.DisplayStatusBar = True
A+
 
Dernière édition:

Magic_Doctor

XLDnaute Barbatruc
Re : Occulter ou faire apparaître la barre de tâches

Merci Fred0o, c'est exactement ce que je cherchais.

Bonne fin de soirée
 

Magic_Doctor

XLDnaute Barbatruc
Re : Occulter ou faire apparaître la barre de tâches

Caramba, ça ne marche pas quand on est en plein écran, et c'est justement en mode plein écran que je désirais bénéficier de la possibilité d'occulter ou pas cette barre.
C'est vraiment bizarre...
 

Fred0o

XLDnaute Accro
Re : Occulter ou faire apparaître la barre de tâches

Holà Magic_Doctor,

Chez moi, avec Windows XP et Excel 2003, je peux faire la manip en plein écran ou en écran normal. Peut-être est-ce différent avec Windows Seven ?

A+
 

Fred0o

XLDnaute Accro
Re : Occulter ou faire apparaître la barre de tâches

Re bonsoir,

Peux-tu me faire une capture d'écran STP ?
En attendant je vais essayer sur mon autre PC (Windows XP et Excel 2007).

A+
 

Fred0o

XLDnaute Accro
Re : Occulter ou faire apparaître la barre de tâches

Bonsoir Magic_Doctor, CC

Après test sur Windows XP et EXCEL 2007, j'ai la même problématique que toi, que je ne sais pas traiter. Peut-être en utilisant le lien fourni par CC ?

A+
 

Magic_Doctor

XLDnaute Barbatruc
Re : Occulter ou faire apparaître la barre de tâches

Bonsoir c-c,

J'ai vérifié, je suis bien sous Excel 2007.

J'aimerais bien joindre ce classeur, mais curieusement je ne peux joindre de pièce, à moins de créer un nouveau fil...
C'est encore bizarre !
 

BrunoM45

XLDnaute Barbatruc
Re : Occulter ou faire apparaître la barre de tâches

Hola Magic_doctor,

Il faut passer en mode avancé (ALT+X) pour la réponse
et là, tu devrais avoir le bouton, gérer les pièces

A+
 

BrunoM45

XLDnaute Barbatruc
Re : Occulter ou faire apparaître la barre de tâches

Re,

La barre d'état apparait bien, sauf que celle-ci se trouve en dessous de la barre de taches

Avec le code
Code:
Private Declare Function FindWindowEx& Lib "user32" Alias "FindWindowExA" _
 (ByVal hWnd1&, ByVal hWnd2&, ByVal lpsz1$, ByVal lpsz2$)
 Private Declare Function ShowWindow& Lib "user32" (ByVal hwnd&, ByVal nCmdShow&)
 
 sub TaskBar_Hide()
 ShowWindow FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString), 0
 end sub
 
 sub TaskBar_Show()
 ShowWindow FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString), 5
 end sub
A+
 

Magic_Doctor

XLDnaute Barbatruc
Re : Occulter ou faire apparaître la barre de tâches

Merci Bruno M45 pour ta diligence, mais :
1/ je n'ai absolument rien compris. Ce n'est pas grave, et discipliné j'ai mis ce que tu m'as donné dans un module :

Private Declare Function FindWindowEx& Lib "user32" Alias "FindWindowExA" (ByVal hWnd1&, ByVal hWnd2&, ByVal lpsz1$, ByVal lpsz2$)
Private Declare Function ShowWindow& Lib "user32" (ByVal hwnd&, ByVal nCmdShow&)
-------------------------------------
Sub TaskBar_Hide()
ShowWindow FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString), 0
End Sub
-------------------------------------
Sub TaskBar_Show()
ShowWindow FindWindowEx(0, 0, "Shell_TrayWnd", vbNullString), 5
End Sub
-------------------------------------
2/Ça ne marche malheureusement toujours pas...

¡Poca suerte esta tarde!
 

BrunoM45

XLDnaute Barbatruc
Re : Occulter ou faire apparaître la barre de tâches

Re,

Désolé, voici ton fichier modifié
Lorsque tu cliques sur ton bouton rond pour afficher/masquer la barre d'état
cela masque/affiche la barre de tâches

A+
 

Fichiers joints

Magic_Doctor

XLDnaute Barbatruc
Re : Occulter ou faire apparaître la barre de tâches

Rebonsoir M45,

Effectivement une barre apparaît, mais sans doute me suis-je mal exprimé et je m'en excuse très platement.
Ce que j'appelais "barre des tâches" est cette barre qui se trouve tout en bas de la feuille d'Excel et où apparaît la SOMME des cellules selectionnées.
C'est cette barre que je voudrais faire apparaître suivant mes desiderata quand je suis en PLEIN ÉCRAN.
 

Magic_Doctor

XLDnaute Barbatruc
Re : Occulter ou faire apparaître la barre de tâches

Bonsoir c-c,

En conséquence, sur Excel, vouloir faire apparaître la barre d'état en mode plein écran, alors que cette barre peut être des plus utiles pour vérifier des sommes de valeurs de cellules ou encore de moyennes, voilà ce que j'appellerai une nullité d'Excel en dépit de toutes ses prétentions.
 

MJ13

XLDnaute Barbatruc
Re : Occulter ou faire apparaître la barre de tâches

Bonjour à tous

Je ne sais pas si c'est normal, mais après avoir ouvert le fichier de Bruno en #16, mon alt+F11 ne fonctionne plus.

Alors, c'est quoi l'antidote :confused:.

Eviter de jouer aux apprentis sorciers, si vous ne savez pas rendre nos Excel comme aux premiers jours :).
 

HachemCress

XLDnaute Junior
Re : Occulter ou faire apparaître la barre de tâches

Bonjour,
Application.StatusBar.visible = True
.visible est en trop :

Sub barre_taches()
Application.StatusBar = True
Application.StatusBar = "C'est fait"
End Sub

ça ne marche pas en plein écran
On ne peut pas avoir le beurre et l'argent du beurre
 
Dernière édition:

BrunoM45

XLDnaute Barbatruc
Re : Occulter ou faire apparaître la barre de tâches

Salut MJ13

Eviter de jouer aux apprentis sorciers, si vous ne savez pas rendre nos Excel comme aux premiers jours
Quel jeu d'apprenti sorcier !?
Dans le code, nous n'utilisons que les API windows ...

Essaye de retirer les miettes de pain que tu as derriere tes touches :)

A l'ouverture du fichier ALT+F11 chez moi fonctionne parfaitement

A+
 

Discussions similaires


Haut Bas