corespondance tex et combo box

L

Lolote83

XLDnaute Barbatruc

• 12 Février 2013

• #2

Re : corespondance tex et combo box

Salut manuBX
Peut être comme ça !!!
@+ Lolote83

 

Pièces jointes

• Copie de manuBX - Combo et Tex box.xls

  54.5 KB · Affichages: 38

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 12 Février 2013

• #3

Re : corespondance tex et combo box

Bonjour à tous,

une solution sans macro

à+
Philippe

 

Pièces jointes

• 111.xls

  42.5 KB · Affichages: 43
• 111.xls

  42.5 KB · Affichages: 45
• 111.xls

  42.5 KB · Affichages: 49

Vote positif 0 Vote négatif

M

manuBX

XLDnaute Occasionnel

• 12 Février 2013

• #4

Re : corespondance tex et combo box

Bonsoir
Merci a vous deux
La solution sans macro ne corespond pas à la suite de mon projet
L autre solution possède un incovenient comme cela le démontre dans mon fichier ci joint lors de 2 nom identique et 2N° differents
donc je recherche le code à partir du choix combobox le résultat du choix dans le texte box y compris dans le cas de doublon en nom et pas en N°

Merci d'avance

 

Pièces jointes

• Copie%20de%20manuBX%20-%20Combo%20et%20Tex%20box(1).xls

  54 KB · Affichages: 34

Vote positif 0 Vote négatif

L

laetitia90

XLDnaute Barbatruc

• 12 Février 2013

• #5

Re : corespondance tex et combo box

bonsoir tous
tout par macro

Code:

 Private Sub userform_initialize()
 ComboBox1.List = Feuil3.Range("o3:p" & Feuil3.Cells(Rows.Count, 15).End(xlUp).Row).Value
End Sub
Private Sub combobox1_Click()
 Tel = ComboBox1.List(ComboBox1.ListIndex, 1)
 Feuil1.[c4] = ComboBox1
 Feuil1.[c6] = Tel.Value
End Sub
Private Sub CommandButton1_Click()
 Unload Me
End Sub

 

Vote positif 0 Vote négatif

M

manuBX

XLDnaute Occasionnel

• 14 Février 2013

• #6

Re : corespondance tex et combo box

merci LAETITIA

cela fonctionne

 

Vote positif 0 Vote négatif