Liste Modifiable + selection

Résolu
Kickaha59 Messages postés 18 Date d'inscription mercredi 14 mai 2008 Statut Membre Dernière intervention 5 juin 2009 - 25 août 2008 à 15:42
Kickaha59 Messages postés 18 Date d'inscription mercredi 14 mai 2008 Statut Membre Dernière intervention 5 juin 2009 - 26 août 2008 à 09:45
Bonjour à tous,
Dans le cadre de mon travaul, je réalise une base de donnée sous access.
Mon problème est le suivant :
J'aimerai définir la valeur de plusieurs listes lors de l'édition d'une fiche.
Le contenu de ces listes est fait à partir de requetes.
Voici le code que j'ai fait jusqu'ici :

<hr />
    sql "SELECT NumEvenement, DateDePrevision, DateDeReport, DateDeSolde, Intitule, IdTypeEvenement, IdArticle, IdArchiProcess, IdFnc, IdLitige, IdTypeAudit, Commentaire, IdResponsable, IdAuteur FROM Evenement WHERE Evenement.IdEvenement" & Me.LstEv.Value
    Set DB = CurrentDb()
    Set rs = DB.OpenRecordset(sql)
    Me.NumEvenement.Value = rs.Fields("NumEvenement").Value
    Me.DateDePrevision.Value = rs.Fields("DateDePrevision").Value
    Me.DateDeReport.Value = rs.Fields("DateDeReport").Value
    Me.DateDeSolde.Value = rs.Fields("DateDeSolde").Value
    Me.Intitule.Value = rs.Fields("Intitule").Value
    Me.Commentaire.Value = rs.Fields("Commentaire").Value
    valTypeEv = rs.Fields("IdTypeEvenement").Value    sql "SELECT * FROM TypeEvenement WHERE IdTypeEvenement" & valTypeEv
    rs = DB.OpenRecordset(sql)

<hr />
Je suis au moment où j'ai obtenu le bon tuple, il me reste à dire à la liste qu'elle doit selectionner cette valeur mais je ne vois pas comment.
Merci pour l'aide que vous m'apporterez.
A voir également:

1 réponse

Kickaha59 Messages postés 18 Date d'inscription mercredi 14 mai 2008 Statut Membre Dernière intervention 5 juin 2009
26 août 2008 à 09:45
Bonjour à tous,


J'ai trouvé moi-même la solution, il faut ajouter cette ligne :





<hr />

Me.LstTypeEv.Value = rs.Item(1)

<hr />
LstTypeEv étant ma liste et le Item(1) correspond à l'attribut que je souhaite y mettre.
3
Rejoignez-nous