Bonjour,j'ai 2 tableau qui alimente une combobox.quand je clique sur la valeur qui est à l'interieur de la combobox je veux que cette valeur soit tranfere dans un textbox.
la combobox(cbxprix)elle est bien rempli mais quand je clique sur la valeur de la combo elle reconnait pas indice(j).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Public Sub UserForm_Initialize() couleur = Array("rouge", "jaune", "vert clair", "bleu clair", "vert foncée") indice = Array("3", "6", "45", "44", "7") Do While j < UBound(couleur) + 1 UserForm1.cbxprix.AddItem (couleur(j) & " l'indice est " & indice(j)) j = j + 1 Loop End Sub
je pense que les tableau il fait pas les declarées quand on initialise l'userform .
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub cbxprix_Click() UserForm1.txtprix.Visible = True txtprix.Text = indice(j) End Sub
merci pour votre aide
Partager