Identifier l'appelant d'un menu contextuel

[zitoune92]

Bonjour,

J'ai créé un menu contextuel mnu_copy que j'appelle dans une ListBox1 via la propriété "Shortcut Menu Bar".

1 boutons s'affiche:
"Copier toute la liste" (par exemple)

Le code associé est sensé copier dans le clipboard le contenu de cette liste (cela pourrait être autre chose mais toujours lié à la ListBox)

Mon problème maintenant c'est que je voudrais réutiliser ce code pour d'autres ListBox différentes, éventuellement dans des formulaires différents, mais en détectant laquelle a "appelé" le menu afin que je puisse adapter le code en fonction de la liste. Cela évite de créer n menus

Est_ce possible ?

Merci d'avance

[zitoune92]

Bon, une solution pour contourner cela (si ça interesse quelqu'un )

Dans un module, création d'une variable globale:

Code :

Global CurrentListBox As ListBox

dans chaque ListBox, à l'évenement OnEnter je mets:

Code :

Set CurrentListBox = Nom_de_la_ListBox

Bien évidemment, chaque ListBox a sa propriété Shortcut Menu Bar avec le même nom de fonction

Et dans cette fonction appelée par le menu, je peux tester la valeur de CurrentListBox.name

Voilou...

[Arkham46]

bjr,

est-ce ActiveControl ne conviendrait pas?
si on click droit sur la liste, elle devient l'ActiveControl

ou voir CodeContextObject mais j'ai un doute pour celui-là (je crois que c'est le formulaire qui est renvoyé)

[zitoune92]

Envoyé par Arkham46

bjr,

est-ce ActiveControl ne conviendrait pas?
si on click droit sur la liste, elle devient l'ActiveControl

ou voir CodeContextObject mais j'ai un doute pour celui-là (je crois que c'est le formulaire qui est renvoyé)

Non. Screen.ActiveControl ne prend pas en compte la ListeBox dans laquel on fait le click-droit. Il garde toujours le dernier bouton que l'on a cliqué. Bizarre...
Quand à CodeContextObject, tu as raison c'est le nom du formulaire.

Merci quand même

[Arkham46]

Envoyé par zitoune92

Non. Screen.ActiveControl ne prend pas en compte la ListeBox dans laquel on fait le click-droit. Il garde toujours le dernier bouton que l'on a cliqué. Bizarre...
Quand à CodeContextObject, tu as raison c'est le nom du formulaire.

Merci quand même

arf tant pis

merci pour le retour

[Philippe JOCHMANS]

Bonjour

J'ai écrit il y a pas mal de temps un tuto sur les barres de commandes : Personnaliser vos barres de commandes dans Access

J'ai utilisé une astuce dans un des exemples pour passer en paramètre une donnée comme dans le premier exemple de la partie Bonus : http://starec.developpez.com/tuto/barrecommande/#LVI-A

Lié avec ce que tu as trouvé cela pourrait être une piste et recoupe un peu ce que tu as actuellement.

Philippe

[zitoune92]

Envoyé par Philippe JOCHMANS

Bonjour

J'ai écrit il y a pas mal de temps un tuto sur les barres de commandes : Personnaliser vos barres de commandes dans Access

J'ai utilisé une astuce dans un des exemples pour passer en paramètre une donnée comme dans le premier exemple de la partie Bonus : http://starec.developpez.com/tuto/barrecommande/#LVI-A

Lié avec ce que tu as trouvé cela pourrait être une piste et recoupe un peu ce que tu as actuellement.

Philippe

J'ai vu ton exemple mais malheureusement, cela ne collait pas avec mon cas.

Merci en tous cas.