faire apparaitre a l'écran une fenêtre Excel

[darkspoilt]

Bonjour je voudrais savoir comment agrandir une fenêtre excel réduite car avant je faisait ça

[cpp]
appli.Visible = True
feuille.Select
feuille.Range("A1").Activate[/cpp]

ça la fait apparaitre mais des fois elle apparait en réduite

des fois cela fonctionnen des fois cela fonctionne pas du tout

merci d'avace

 

[zeb]

Fais une recherche sur WindowState dans l'aide de VBA/Excel.

 

[darkspoilt]

excuse moi pour le retard mais comme d'hab je suis sous acces
de plus je dois pas avoir une aide complete
car quand je tape windowstate ds l'aide de visual basic j'ai que dalle

 

[darkspoilt]

J'ai trouvé
mais il m'affiche pas a l'avant de l'écran

[cpp]
'fenetre visible
appli.Visible = True

'selectio ndel a feuille vouant etre vu
feuille.Select
feuille.Range("A1").Activate

'agrandissement de la fenêtre
appli.WindowState = xlMaximized
[/cpp]

sauf que lors de l'agrandissement de la fenêtre il me met pas mon appli excel en premier plan enfin pas toujours ce n'est pas le cas au début après ca le devient je ne comprend pas pourquoi

 

[zeb]

Utilise alors ShowWindow de l'API Windows.

(Tiens, je n'ai aucune idée de comment faire avec des fonctions VB :/ )

 

[darkspoilt]

[cpp]Declare Function ShowWindow Lib "user32" ( _
ByVal hwnd As Long, _
ByVal nCmdShow As Long) As Long[/cpp]

J'ai trouvé comment déclaré la fonction mais pas comment l'utilisé

Pourais-je avoir un exemple?

 

[darkspoilt]

J'ai trouvé

[cpp]Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long[/cpp]

et malgré cette ligne
[cpp]ShowWindow appli.hwnd, 5[/cpp]

je ne vois toujours pas ma fenetre

j'ai essayé de réduire ma fênêtre Acces avec ca
[cpp]ShowWindow Me.hwnd, 0[/cpp]
Mais il me fait une erreur au niveau de Me comme quoi j'en aurait une utilisation incorrecte.

 

[zeb]

Quand tu déclares une fonction de l'API en VB, je t'invite à définir les constantes correspondantes. C'est juste une histoire de convention et d'usage. Ainsi, plutôt que d'écrire 0, 2, 3, 5, 6, 8, 9, tu mets SW_HIDE, SW_SHOWMINIMIZED, SW_MAXIMIZE, SW_SHOW, SW_MINIMIZE, SW_SHOWNA, SW_RESTORE. C'est plus clair.

Je lis l'aide de ShowWindow :

SW_SHOW 5 Active et affiche la fenêtre.

Donc ça devrait activer Excel. :/

Je vais donc te demander d'être plus explicite. Qu'est-ce qui ne s'affiche pas ? L'appli, la fenêtre, le classeur, l'onglet ?

Sinon, essaie d'abord de minimiser (SW_MINIMIZE) sans activer (donc ne pas utiliser SW_SHOWMINIMIZED) puis de réactiver (SW_SHOW) ton appli.

appli, si c'est une variable de type Application, possède un handle de fenêtre (H WND).
Me, si c'est une feuille ou un classeur, n'en possède pas.

 

[darkspoilt]

j'ai résolu mon problème
au début l'appli ne s'affichait pas ensuite c'était les onglet de l'appli qui voulait pas se montrer
donc j'ai fait ça et ca marche

[cpp] ShowWindow appli.hwnd, 3
appli.Visible = True[/cpp]

Merci pour ton aide en tout cas

 

[zeb]

\/ yeepee !