[ACCESS/VBA] Selection multiple auto dans une zone de liste

[ACCESS/VBA] Selection multiple auto dans une zone de liste

Selection multiple auto dans une zone de liste [ACCESS/VBA] - VB/VBA/VBS - Programmation

Marsh Posté le 18-05-2006 à 14:35:42

Bonjour à tous,

J'aurais une petite question. J'ai une zone de liste dans un formulaire
qui est rempli par une requete toute bete (Id_Discipline et
Nom_Discipline). Jusque là, ma zone de liste liste toutes mes
disciplines disponibles.

Ensuite dans un code VB, je fais une autre requete qui recup des
couples Id_Discipline et Nom_Discipline. Ce que j'aimerais bien faire
c'est de selectionner automatiquement les lignes dans la zone de liste
grace au resultat de cette requete. Voici mon code mais ca ne
fonctionne pas ...

Code :

Dim RES As ADODB.Recordset
Set RES = New ADODB.Recordset
Dim REQ_SQL As String
REQ_SQL = "SELECT Ident_Disc FROM ENSEIGNE WHERE Ident_T="
REQ_SQL = REQ_SQL & listed_att_enseignant & ";"
Me.listem_att_disciplines.RowSourceType = "Value List"
RES.Open REQ_SQL, CurrentProject.Connection
While Not RES.EOF
Me.listem_att_disciplines.Column(RES(\"Ident_Disc\" )).Selected
' je pense que ca vient de cette liste ...
RES.MoveNext
Wend
RES.Close
Set RES = Nothing

Pour illustrer, voila deux images :

La liste est remplie par une requete totale sur les disicplines

Ensuite, grace à la requete en VB selectionner les lignes que j'ai recup de ma requete.

Voilà, j'espère que j'ai été clair ... ce n'est pas facile d'expliquer comme ça ... merci :hello:

Reply

Marsh Posté le 18-05-2006 à 14:35:42

Reply

Marsh Posté le 19-05-2006 à 12:46:04

:bounce:

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *