USERFORM AVEC FONCTIONS MAXIMISER, MINIMISER ET ETIRABLE UTILISANT LES API WINDO
allthew3
Messages postés
551
Date d'inscription
samedi 8 janvier 2005
Statut
Membre
Dernière intervention
12 avril 2008
-
5 juil. 2007 à 15:24
cs_patosch Messages postés 42 Date d'inscription jeudi 20 septembre 2007 Statut Membre Dernière intervention 26 juin 2013 - 13 déc. 2010 à 18:18
cs_patosch Messages postés 42 Date d'inscription jeudi 20 septembre 2007 Statut Membre Dernière intervention 26 juin 2013 - 13 déc. 2010 à 18:18
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/43350-userform-avec-fonctions-maximiser-minimiser-et-etirable-utilisant-les-api-windows
https://codes-sources.commentcamarche.net/source/43350-userform-avec-fonctions-maximiser-minimiser-et-etirable-utilisant-les-api-windows
13 déc. 2010 à 18:18
pour reconnaitre le handle tu utilise "gaw:du get active windows" je faisais cette même erreur par fainéantise mais par curiosité
essai de faire tourner ta fonction avec plusieurs usf affiché a l'écran tu va voir que tous vont prendre les modifications
utilise plutôt le findwindowA vbnullstring,me.caption c'est plus précis sur la fenêtre a modifier
au plaisir
26 mars 2008 à 09:24
je suis débutant en VBA et j'aimerai que ma fenêtre s'ouvre en plein écran par défaut, quelqu'un peut me dire comment faire?
Merci d'avance
25 nov. 2007 à 14:35
il suffit de redessiner le menu du UserForm avec DrawMenuBar Whdl
La déclaration de la fonction DrawMenuBar :
Private Declare Function DrawMenuBar Lib "user32.dll" (ByVal m_hWnd As Long) As Long
En plus, le fait d'exécuter DrawMenuBar dispense de passer par la propiété Title.
En passant ton code est privé de Option Explicit.
2pme
30 oct. 2007 à 10:14
Je suis novice en VBA (je ne développe que depuis hier sous Excel)
ton code est très interressant, mais je n'arrive pas à interdire le plein écran de ma useform (cela doit être trois fois rien mais comme je ne maitrise pas du tout le code et l'interface, je passe à côté)
Ce que je voudrais faire, c'est soit ne pas afficher le bouton "maximize" ou si cela n'est pas possible, arriver à lire l'évenement quand on appui dessus pour interdire le plein écran de la fenêtre
Merci d'avance à ceux ou celles qui pourront m'aider
27 juil. 2007 à 10:59
Je réponds à mon propre message.
J'ai trouver un moyen de faire marcher mon application.
Le problème venait du fait que dans Userform_Inisalize ()
Après avoir mis ce bout de code j'ajoutais des valeurs dans la spreadsheet, puis je lui donnais le focus.
J'ai juste écris le code après l'incrémentation de la spreadsheet.
J'espère que ça pourra aider certains.
et encore merci.
Gyre
27 juil. 2007 à 10:45
D'abord merci pour ce petit bout de code qui me simplifie grandement la vie.
Par contre j'ai un petit probleme.
Le code marche nickel sur mes différentes userforms sauf une ou j'ai une Spreadsheet.
Je ne m'y connais pas assez pour comprendre le pourquoi de la chose. En fait: La userform affiche bien les icones réduire agrandir, mais le clique n'a aucun effet dessus. J'ai remarqué que la croix (Qui marche) ferme bien la user forme mais c'est une croix qui est décalée d'un pixel comme si elle se trouvait derrière l'image d'une première croix.
Bref ca ne marche pas, et ça marche si j'enleve la Spreadsheet...
Help SVP
11 juil. 2007 à 17:34
A l'attention de cameron91: Tu me croiras ou pas, mais j'ai découvert ton code la semaine dernière. Il est...fait, a des côtés peu pratiques, des API nommées à la va-vite, est peu portable et a moins de fonctions que le mien.
Autre pb c'est qu'il n'est pas en VB6 mais en VBA. :D
mouahhaaa, non j'te crois ^^
par contre n'hésites pas à t'inspirer de ma classe pour modifier ton code, çà risque d'être bénéfique ;)
++
11 juil. 2007 à 10:45
A l'attention de PCPT: Tu me croiras ou pas, mais je viens de découvrir ton code sur le même sujet. Il est trés bien fait et a des fonctions supplémentaires au mien.
Le seul pb c'est qu'il n'est pas en VBA mais en VB.
9 juil. 2007 à 17:34
slts!
_______________________________________________________
Toujours + de VB et d'API => APi @ la Loupe
http://apialaloupe.free.fr
9 juil. 2007 à 13:41
Zavier666, comment faire sans API ?
5 juil. 2007 à 21:45
important : les API sont par chance référencées (toile), c'est préférable de les utiliser telles quelles.
le dev c'est c'est pas trop de la radinerie de saisie... ^^
5 juil. 2007 à 18:13
Peux-tu m'indiquer ou trouver comment faire en VBA?
5 juil. 2007 à 17:51
tout faire directement depuis VBA.
En revanche ces API sont très pratique pour modifier des fenêtres d'autres programmes.
slts!
___________________________________________________
Toujours + de VB et d'API => APi @ la Loupe
http://apialaloupe.free.fr
5 juil. 2007 à 17:49
désolé
5 juil. 2007 à 16:59
5 juil. 2007 à 15:24