Faire apparaitre un menu sur un UserForm.

Faire apparaitre un menu sur un UserForm. - VB/VBA/VBS - Programmation

Marsh Posté le 24-11-2006 à 14:24:20    

Bonjour,
Quand je clique sur un UserForm.CommandButton (Macro en cours d'execution), je souhaite faire apparaître un menu style contextuel mais avec mes propres fonctions.
Comment faire?
Merci.

Reply

Marsh Posté le 24-11-2006 à 14:24:20   

Reply

Marsh Posté le 24-11-2006 à 16:20:00    

tu peux faire apparaitre plus bas sur ton formulaire, une liste de choix contenant les intitulés de tes propres fonctions.
 
Cette liste existerait en fait déjà mais serait paramétrée en  
 
Listbox1.Visible=false par défaut et ton commandbutton la rendrait visible
 
La sélection d'une ligne de 1 à N entrainerait alors la fonction correspondante.
 
J'ai du code la-dessus...

Reply

Marsh Posté le 24-11-2006 à 16:28:41    

Dans environnement VBA : AIDE Onglet "Aide intuitive " faire une recherche "menu contextuel" et voir exemple ajouter et afficher des menus contextuels
sinon http://www.google.fr/search?hl=fr& [...] cher&meta=


Message édité par kiki29 le 27-11-2006 à 09:56:48
Reply

Marsh Posté le 24-11-2006 à 16:45:12    

Je ne vois pas vraiment l'intérêt d'un menu contextuel pour un bouton, qui par définition est tjs au même endroit.

Reply

Marsh Posté le 24-11-2006 à 16:50:13    

moi non plus mais c'est ce qu'il demande, à moins qu'une fois de plus la question ne soit mal formulée ou comprise


Message édité par kiki29 le 24-11-2006 à 16:55:07
Reply

Marsh Posté le 24-11-2006 à 17:04:19    

On est d'accord.
Par ailleurs je suis assez intéressé par ces menus pop up contextuels et je ne trouve pas d'"Aide intuitive" dans VBA...
 
J'ai trouvé ca sur le net :
 
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
  PopupMenu menu
End If
End Sub
 
je ne sais pas si ca fonctionne et je ne sais en tous cas pas comment remplir le menu...

Reply

Marsh Posté le 24-11-2006 à 17:14:35    

un exemple complet : http://www.bygsoftware.com/example [...] nuDemo.zip


Message édité par kiki29 le 24-11-2006 à 17:46:46
Reply

Marsh Posté le 27-11-2006 à 13:32:09    

Je trouve que faire apparaître une Form qui ressemble a un menu contextuel fait plus pro qu'une liste box.
C'est pas possible d'insérer une image du disque dur sur le forum? Car j'ai un montage photo pour mieux comprendre.

Reply

Marsh Posté le 27-11-2006 à 13:37:00    

as tu regardé l'exemple donné à http://www.bygsoftware.com/example [...] nuDemo.zip
en sélectionnant la feuille WorksHere puis clic droit ?

Reply

Marsh Posté le 27-11-2006 à 15:48:00    

Ok, j'avais pas compris l'exemple.
C'est vrai que ca marche, mais y a bcp de code pour une si petite fonction. Ca me depanne, merci.

Reply

Marsh Posté le 27-11-2006 à 15:48:00   

Reply

Marsh Posté le 28-11-2006 à 10:01:25    

Merci également. Ca va pas mal me servir.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed