Discussion :

[ip203]

Bonjour,

J'ai un formulaire avec pleins de controles, notament un qui est une zone de liste à choix multiple. Grâce à du code VBA je transforme l'ensemble des sélections en une chaine de caractère. Cette zone est lié à un champ nommé "Equipement" de ma table "Foyer". J'aimerai savoir comment proceder une fois que la sélection est faîte pour ajouter cette chaine à mon champ ?
J'ai trouvé en faisant une recherche le code suivant mais le problème c'est que moi je ne veux rajouter que cette info et pas les autres champs (pour l'instant).

Code :

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

1
2
3
4
5
6
Dim i As Long 
For i = 0 To Me.lst_acteur.ListCount - 1 
    If Me.lst_acteur.Selected(i) Then 
       DoCmd.RunSQL INSERT INTO participer (titre_film, nom_personne, en_qualite_de) VALUES ( " & Me.titre & ", " & Me.lst_acteur & ", "Acteur")" 
    End If 
Next i

Merci par avance du coup de main...

[cafeine]

Hello,

il manque les quotes (') pour délimiter du texte dans votre SQL

[Kloun]

Code :

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

DoCmd.RunSQL "INSERT INTO participer (titre_film, nom_personne, en_qualite_de) VALUES ( '" & Me.titre & "', '" & Me.lst_acteur & "', 'Acteur')"

Ca ira sans doute mieux.

[ip203]

Merci,

Ce n'est pas grave si je n'insère qu'un seul champ avec cette requête, les autres seront mis à jour à la fin de la saisie de mon formulaire ?