Discussion :

[cluis]

Bonjour,

L'exemple donné dans la FAQ ne semble pas fonctionner avec une combobox.

Voici le code que j'ai utilisé. Quelles sont les instructions à utiliser ?

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Public Sub Liste_Selectionner(cbxListe As ComboBox, intColonne As Integer, strChaineChercher As String)
 
    Dim intIndice As Integer
 
    intIndice = 0
    While ((intIndice <= cbxListe.ListCount - 1) And (cbxListe.Column(intColonne, intIndice) <> strChaineChercher))
        cbxliste.????
        intIndice = intIndice + 1
    Wend
 
End Sub

Merci de vos réponses.

[LedZeppII]

Bonsoir,

D'après ce que j'ai essayé il faut affecter la valeur de la colonne liée.

Code :

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

cbxListe.Value = cbxListe.Column(cbxListe.BoundColumn - 1, intIndice)

[cluis]

Cela fonctionne.

Merci et bonne journée.