Textbox vs Combobox avec Textcolumn

Bonjour,

je voudrais récupérer la valeur d'un combobox (a plusieurs colonnes) dans un textbox mais le probleme c'est que je veux récupérer uniquement la valeur de la deuxieme colonne, comme ceci :

Code:

---

textbox.Value = comboxbox(TextColumn = 2).Value

---

Mais ça ne marche pas....y a t-il une soluce? merci

As-tu regardé l'explorateur d'objets? Tu as dedans une propriété de l'objet combobox qui te permettra de renvoyer une seule colonne. ;)

oui je connais...mais le probleme c'est que ma textbox ne prend pas en compte le "textcolumn" de ma combobox donc je me retrouve avec la valeur de la colonne 1 au lieu de la 2
merci pour ton aide

bonjour,
le pb ne viendrait pas de là ?

Citation:

---

Valeurs

Les valeurs de la propriété TextColumn sont comprises entre –1 et le nombre de colonnes de la liste. La valeur de la propriété TextColumn pour la première colonne est 1, la valeur de la deuxième colonne est 2, et ainsi de suite. La définition de la propriété TextColumn sur 0 affiche les valeurs de la propriété ListIndex. La définition de la propriété TextColumn sur –1 affiche la première colonne ayant une valeur de la propriété ColumnWidths supérieure à 0.

---

cf l'aide vab..

cordialement,

Didier

En cherchant un peu beaucoup, j'ai trouvé ceci

Code:

---

listbox.Value = combobox.Column(1)

---

c'est cool mais ça fonctionne sur un seul textbox

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Private Sub New_component2_Change()   fredes.Value = New_component2.Value freadddes.Value = New_component2.Value Engdes.Value = New_component2.Value engadddes.Value = New_component2.Value issue.Value = New_component2.Value   New_desfr.Value = fredes.Column(1) ' ça fontionne New_adddesfr.Value = freadddes.Column(2) 'ça fonctionne pas New_desan.Value = freadddes.Column(3) 'ça fonctionne pas New_adddesan.Value = freadddes.Column(4) 'ça fonctionne pas     End Sub

---

Citation:

---

Envoyé par Jeyjey1

En cherchant un peu beaucoup, j'ai trouvé ceci

Code:

---

listbox.Value = combobox.Column(1)

---

---

C'est pour que tu trouves ça que je t'avais dit de chercher dans l'explorateur d'objets. ;)

On peut voir ton fichier Excel, stp? Car là il faudrait voir tous tes objets pour te dire pourquoi ça plante.

Désolé mais le fichier excel fait plus de 11mo et j'suis limité à 5mo:cry:

Utilise un hébergeur externe. ;)

Personnellement j'utilise SendSpace (cherche sur google), mais bon tu prends ce que tu veux.

mais j ai remarqué qu'il ne traitait que la 1ere ligne, tous fonctionne s'il est en premier

Code:

---

1 2 3 4

New_desfr.Value = fredes.Column(1) ' ça fontionne New_adddesfr.Value = freadddes.Column(2) 'ça fonctionne pas New_desan.Value = freadddes.Column(3) 'ça fonctionne pas New_adddesan.Value = freadddes.Column(4) 'ça fonctionne pas

---

Je sais tu l'as déjà dit, mais si je te demande le classeur, c'est pour pouvoir faire des tests et du débogage dessus.

Salut
As tu essayé ces solutions :

Définis la propriété "textcolumn" vec le numéro de la colonne dont tu veux récupérer la valeur.
Ensuite dans ton code tu fais :

Code:

---

textbox.Value = comboxbox.Text

---

Définis la propriété "boundcolumn" avec le numéro de la colonne dont tu veux récupérer la valeur.
Ensuite dans ton code tu fais :

Code:

---

textbox.Value = comboxbox.Value

---

Cordialement,
Frednts

Bonjour,

j ai effectivement utilisé ce genre de méthode, mais le truc c'est qu'il ne prend en compte que la première ligne de code.....je peux les mélanger dans tous les sens il ne prendra que la première

Code:

---

1 2 3 4

Me.New_desfr.Text = Me.New_component2.List(Me.New_component2.ListIndex, 1) Me.New_adddesfr.Text = Me.New_component2.List(Me.New_component2.ListIndex, 2) Me.New_desan.Text = Me.New_component2.List(Me.New_component2.ListIndex, 3) Me.New_adddesan.Text = Me.New_component2.List(Me.New_component2.ListIndex, 4)

---

Désolé mais en fait mon problème venait du controlsource de mes textbox, c'était vicieux.Merci pour votre aide