combobox

[dam30]

bonjour a tous,
je voudrai que lorsque je selectionne ma ligne dans le combobox il m'affiche le contenu de la colonne b.
exemple selection dans le menu deroulant '105 : peche'
affichage dans le combobox: '105'
merci [file name=Classeur3_20050727112311.zip size=10073]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur3_20050727112311.zip[/file]

 

[bbmarcus]

Bonjour dam30, le forum,

je connais pas la réponse....par contre il a été question de ca la semiane dernière il me semble........va jeter un oeil dans les archives....tu devrais trouver...

@+

bbmarcus

 

[Omicron]

Bonjour Dam

Tu trouveras en pièce jointe une solution au problème posé.

Cordialement

Omicron

[file name=Marine.zip size=11608]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Marine.zip[/file]

 

[Omicron]

Bonjour Dam

Tu trouveras en pièce jointe une solution au problème posé.

Cordialement

Omicron

[file name=Marine_20050727114800.zip size=11608]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Marine_20050727114800.zip[/file]

 

[JORDAN]

Bonjour Dam30,

Voici une soluce
bon courage

 

[Eric C]

Bonjour le forum
Bonjour dam30, bonjour JORDAN & bonjour Omicron

Je profite d'une t'chiote pause Omicron et je me permets de reprendre ton code et de le 'modifier' pour Dam30 car j'ai cru comprendre que lors de la saisie de texte dans son Cbo, il désire que la valeur numérique lui soit retournée.

Oups, voici le code à placer dans le fichier d'Omicron (Je suis comme JORDAN, je pense et puis j'oublie....)

Private Sub ComboBox1_Change()
For Each Row In Worksheets('Feuil1').UsedRange.Rows
If Row.Cells(1) = ComboBox1 Then
ComboBox1 = Row.Cells(2) '<== C'est ici qu'intervient le remplacement
Exit For
End If
Next Row
End Sub

Baille bye

Message édité par: Eric C, à: 27/07/2005 15:30

 

[dam30]

Merci tout le monde j'ai trouvé mon bonheur avec la derniere solution.
nikel

merci en core à bientôt