Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

ComboBox

manu70

XLDnaute Nouveau
Bonsoir a Tous, bonsoir le Forum,

Je reviens apres un mois d'absence avec encore des questions tordues (désolé )

J'ai 1 userform avec............40 ConboBox (oui je sais, je fais pas dans la dentelle !)

Ma question est la suivante :

Existe t'il une fonction qui permette de connaitre la conbobox qui vient d'etre modifié ?

Le but et de faire un truc du genre :

Si combobox1 ou combobox3 ou combobox5 etc....alors : macro 'untel1'

Si combobox2 ou combobox4 ou combobox6 etc....alors : macro 'untel2'

Et derniere question : comment gardé une variable recuperer par une combo (typ=ComboBox?.value) et l'utilisé dans une macro

Voila !! En vous remerciant par avance
 

Hervé

XLDnaute Barbatruc
Bonsoir

Je ne sais pas si je suis hors cadre, mais pour gérer une même macro pour 40 combobox, je ne connais que le module de classe.

D'apparence compliquer, il te suffit de peu de code pour mettre ceci en application.

Je te met ci-jointe une petite appli, qui fait ce genre de truc.

J'espère qu'un xldiens trouvera une solution plus simple dont je serai aussi preneur.

Salut

[file name=manu.zip size=15754]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/manu.zip[/file]
 

Pièces jointes

  • manu.zip
    7.4 KB · Affichages: 44
  • manu.zip
    7.4 KB · Affichages: 42
  • manu.zip
    7.4 KB · Affichages: 42

_Thierry

XLDnaute Barbatruc
Repose en paix
Bonjour Manu, Hervé, le Forum

Pour Hervé bravo, très très bien et vraiment clair et simple pour un exemple d'usage de Module de Classe.

Pour Manu, il te suffit d'enlever cette ligne

'        Controls('Combobox' & i).AddItem 'Combobox' & i

Pour que le nom de la ComboBox ne s'affiche plus dans chaque item.

Bonne Journée (sans moi, je ne serai pas libre dans les 3/4 de cette journée.
@+Thierry
 

Discussions similaires

Réponses
7
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…