Combobox,RecordSet et Value

Bonjour tout le monde,

voilà j'ai une combobox lié à une table dans ma base de données. Jusque là aucun soucis tous les enregistrement s'affiche bien dans la liste.

Ensuite j'ai besoin de récupérer une valeur lié à l'enregistrement que j'ai sélectionné, j'ai donc écris la procédure suivante :

Code:

---

1 2 3 4

Private Sub cmbTypeRapport_AfterUpdate()   ValeurComboReportType = cmbTypeRapport.Recordset(4). End Sub

---

Quand j'affiche ValeurComboReportType , ça m'affiche la valeur correspondant au premier enregistrement de la liste. Si parcontre je reselectionne un seconde fois mon enregistrement, ValeurComboReportType à la bonne valeur.

Est-ce l'évènement qui n'est pas bon? est-ce que je récupère mal la valeur? Comme je suis débutant en vba, y'a de forte chance que je me sois tromper quelque part.

Merci d'avance

Si tu souhaite récupérer l'indice de la ligne sélectionnée :

Code:

---

ValeurComboReportType = cmbTypeRapport.Value

---

Si tu souhaite récupérer un élément d'une colonne de la ligne sélectionnée :

Code:

---

ValeurComboReportType = cmbTypeRapport.Column(N°Colonne)

---

Le Value me renvoie bien la bonne valeur, parcontre toujours le même problème avec Column, obligé de faire 2 fois le bon choix pour qu'il renvoie la bonne valeur (qu'il fini donc par renvoyer) ><

Merci en tout cas.

Edit : Bon en cherchant un peu j'ai trouver la solution: Donc au lieu de faire un simple

Code:

---

ValeurComboReportType = cmbTypeRapport.Column(4)

---

, enfaisant

Code:

---

ValeurComboReportType = cmbTypeRapport.Column(4, cmbTypeRapport.Value)

---

je récupère ce que je voulais récupérer.

Merci de m'avoir éclairé en tout cas

Bonne journée