XL 2010 application.match et combobox

[Haytam.be]

Bonjour
peut quelqu'un m'aider à corriger ce code,je n'ai pas une grande connaissance sur vba, çi dessous mon code:



For i = LBound(C, 2) To UBound(C, 2) ' pour les colonnes il ny a pas de probléme

Cl = Application. Match(.ComboBox1, C(1, i), 0) ' la ligne numero 1 et colonne ubound

c'est là ou se trouve mon problème et merci: C(1, i)
merci d'avance

 

[sylvanu]

Bonjour Haytam,
Vous n'auriez pas un petit fichier test ?
Sinon trois petites questions :
1- Etes vous sur qu'on peut faire un Match sur une Combobox ?
2- Le point avant Combobox suppose qu'il y ait un With avant. Est ce la cas ?
3- La syntaxe de Match est Match(Valeur,Plage,0) or il semble que vous ayez inversé.

 

[Haytam.be]

Bonjour Haytam,
Vous n'auriez pas un petit fichier test ?
Sinon trois petites questions :
1- Etes vous sur qu'on peut faire un Match sur une Combobox ?
2- Le point avant Combobox suppose qu'il y ait un With avant. Est ce la cas ?
3- La syntaxe de Match est Match(Valeur,Plage,0) or il semble que vous ayez inversé.

Bpnjour Sylvanu je suis vraiment désolé de ne pas répondre tout de suite car j'ai été malade, je viens d'ouvrir aujourd"hui,et j'ai trouvé votre réponse, je vous remercie Sylvanu.

 

[patricktoulon]

hello
Cl = Application. Match(.ComboBox1.value, C(1, i), 0) ' la ligne numero 1 et colonne ubound
'match fonctionne en base 1 donc
Cl=Cl-1'=l'index dans la combobox

 

[Haytam.be]

hello
Cl = Application. Match(.ComboBox1.value, C(1, i), 0) ' la ligne numero 1 et colonne ubound
'match fonctionne en base 1 donc
Cl=Cl-1'=l'index dans la combobox

 

[Haytam.be]

merci infiniment je l'ai trouver avec application.index et pas application.match merci patrick