Discussion :

[mercatog]

Bonjour,
je débute dans l'utilisation des ComboBox dans un classeur excel mais j'ai deux problèmes:

le ComboBox s'apelle ZAKON et constituté de 2 colonnes (DateLoi et Taux).
1. les données proviennent de la feuille(1) nomée Config dans la zone "A20:Bi" où i est une valeur modifiable sur d'autres événements qui provient d'une cellule (Sheets(1).cells(19,4))
j'ai essayé ça sur userform_Activate:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Zakon.RowSource="Config!A20:B"&Sheets(1).Cells(19,4).value

mais erreur de source

2. 2ème problème sur l'user forme, j'ai 2 zone de textes DteLoi et TxLoi dans lesquelles je peux modifier les DateLoi et Taux. comment faire pour récuppérer dans ces 2 zones de textes les données selectionnées dans la ComboBox?

j'ai essayé cela sur ZAKON_OnClick:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
DteLoi=Zakon

ça marche pour la Date mais pas pour le Taux en deuxième colonne

Merci à vous

[Fvandermeulen]

Bonjour,
Je pense que pour ton problème 1, un espace avant et après le & devrait suffire
donc:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Zakon.RowSource="Config!A20:B" & Sheets(1).Cells(19,4).value

Pour le deuxième point, je ne suis pas certain de comprendre mais selon ce que je comprend, pourquoi ne pas mettre un bouton supplémentaire pour validation, tu pourais alors écrire le code lié à ce bouton.

En espérant que ça aide...

[mercatog]

Merci pour votre réponse

mon 1er problème ne vient pas des espaces avant et après le &. Dans mon code j'ai mis cela comme vous indiquiez.

le 2ème problème je veux récupérer les 2 données dans Le ComboBox de l'item sélection à mettre dans 2 text box (au cas où je veux les modifier)
un bouton de validation est prévu pour valider les modifications et les inscrire à la place des anciennes valeur dans la feuille Config.
Merci à vous

[Fvandermeulen]

Deux coups dans l'eau...je veux bien faire quelques test chez moi, mais je promets rien !

[mercatog]

Je continu d'essayer, il est toujours bénéfique de partager l'information
Merci à vous

[Pierre Fauconnier]

Bonjour

Pour ton premier problème, il faut vérifier que

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets(1).Cells(19,4).value

renvoie une valeur qui permet de construire une plage valide.

Pour le deuxième problème, voici un code qui devrait t'aider

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub ComboBox1_Change()
    TextBox1 = ComboBox1.Column(0)
    TextBox2 = ComboBox1.Column(1)
End Sub

à adapter en fonction des noms de tes contrôles