Iconiser Excel sous seven

Bonjour,

Après avoir lut cette discussion, Comment réduire la fenêtre d'une application, pour moi sous SEVEN, cela ne fonctionne pas.

Auriez-vous donc une idée pour Iconiser Excel sous Seven

Merci

Salut

Code:

---

1 2 3

set Ws = createobject("wscript.shell") RunExec = "EXCEL.EXE" Execution = Ws.Run(RunExec,7,false)

---

Le 2éme paramètre définit l'apparence de la fenêtre du programme.
les valeurs possibles sont:

Citation:

---

Envoyé par VBSCRIPT.CHM (aide en ligne)

0 Masque la fenêtre et en active une autre.
1 Active et affiche une fenêtre. Si la fenêtre est réduite ou agrandie, le système lui redonne sa taille et sa position d'origine. Une application doit spécifier cette indication lors du premier affichage de la fenêtre.
2 Active la fenêtre et l'affiche en taille réduite.
3 Active la fenêtre et l'affiche en taille agrandie.
4 Affiche une fenêtre en respectant sa taille et sa position les plus récentes. La fenêtre active reste active.
5 Active la fenêtre et l'affiche d'après sa taille et sa position actuelle.
6 Réduit la fenêtre spécifiée et active la fenêtre de niveau supérieur suivante dans l'ordre alphabétique.
7 Affiche la fenêtre sous l'aspect d'une fenêtre réduite. La fenêtre active reste active.
8 Affiche la fenêtre dans son état actuel. La fenêtre active reste active.
9 Active et affiche la fenêtre. Si la fenêtre est réduite ou agrandie, le système lui redonne sa taille et sa position d'origine. Une application doit spécifier cet indicateur lors de la restauration d'une fenêtre réduite.
10 Définit l'état d'affichage en fonction de l'état du programme qui a démarré l'application.

---

Sous SEVEN 64bits, cela fonctionne chez moi.