ex: pour afficher l'element de
cboNomPrenomAuteur où l'itemdata vaut 3
ca serait du genre:
cboNomPrenomAuteur.index=cboNomPrenomAuteur.ItemData(cboNomPrenomAuteur.value(3).listindex)
(ca me parrait largement incorrect...)
Est ce que la seul solution est de faire une precedure,
ou est elle déja existante dans les evenement et methode des combobox?)
' #############################################################
' Récupération de l'index d'un élément Itemdata dans le combo
' #############################################################
Public Function GetIndex(combo As ComboBox, code As Long)
Dim I As Long
Dim continue As Boolean
continue = True
While (I < combo.ListCount) And continue
continue = combo.ItemData(I) <> code
If continue Then
I = I + 1
End If
Wend
If I = combo.ListCount Then
GetIndex = -1
Else
GetIndex = I
End If
End Function
