FORUM Tom's Hardware » Programmation » VB / VBA / VBS » faire apparaitre a l'écran une fenêtre Excel
 

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

Il y a 394 utilisateurs connus et inconnus. Pour voir la liste des connectés connus, cliquez ici
Ajouter une réponse



 Mot :   Pseudo :  
 
Bas de page
Auteur
 Sujet : faire apparaitre a l'écran une fenêtre Excel
 
Plus d'informations

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

Code :
  1. appli.Visible = True
  2. feuille.Select
  3. feuille.Range("A1" ).Activate


 
ç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
Profil : Modérateur libre
Plus d'informations

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


---------------
Règlement du forum / Règlement de Programmation / Règlement du Monde de Linux euh, n'y en a pas...
Plus d'informations

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


Message édité par darkspoilt le 04-03-2008 à 15:59:15
Plus d'informations

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

Code :
  1. 'fenetre visible   
  2.     appli.Visible = True
  3.    
  4. 'selectio ndel a feuille vouant etre vu
  5.     feuille.Select
  6.     feuille.Range("A1" ).Activate
  7.    
  8. 'agrandissement de la fenêtre
  9.     appli.WindowState = xlMaximized


 
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


Message édité par darkspoilt le 05-03-2008 à 09:05:30
zeb
Profil : Modérateur libre
Plus d'informations

Utilise alors ShowWindow de l'API Windows.

 

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


Message édité par zeb le 05-03-2008 à 10:52:02

---------------
Règlement du forum / Règlement de Programmation / Règlement du Monde de Linux euh, n'y en a pas...
Plus d'informations

Code :
  1. Declare Function ShowWindow Lib "user32" ( _
  2.                  ByVal hwnd As Long, _
  3.                  ByVal nCmdShow As Long) As Long


 
J'ai trouvé comment déclaré la fonction mais pas comment l'utilisé
 
Pourais-je avoir un exemple?


Message édité par darkspoilt le 05-03-2008 à 11:22:18
Plus d'informations

J'ai trouvé  
 

Code :
  1. Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long


 
et malgré cette ligne

Code :
  1. ShowWindow appli.hwnd, 5


 
je ne vois toujours pas ma fenetre
 
j'ai essayé de réduire ma fênêtre Acces avec ca

Code :
  1. ShowWindow Me.hwnd, 0


Mais il me fait une erreur au niveau de Me comme quoi j'en aurait une utilisation incorrecte.

zeb
Profil : Modérateur libre
Plus d'informations

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 :

Citation :

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.


---------------
Règlement du forum / Règlement de Programmation / Règlement du Monde de Linux euh, n'y en a pas...
Plus d'informations

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
 

Code :
  1. ShowWindow appli.hwnd, 3
  2.     appli.Visible = True


 
Merci pour ton aide en tout cas


Message édité par darkspoilt le 05-03-2008 à 13:51:23
zeb
Profil : Modérateur libre
Plus d'informations

\:o/ yeepee !


---------------
Règlement du forum / Règlement de Programmation / Règlement du Monde de Linux euh, n'y en a pas...

Aller à :
Ajouter une réponse
  FORUM Tom's Hardware » Programmation » VB / VBA / VBS » faire apparaitre a l'écran une fenêtre Excel
 

Annonces Google
Publicité