Discussion :

[ronibalbo]

Bonjour à tous,
J'ai une zone de liste avec une option de sélection multiple, je souhaite que cette sélection (multiple) soit stockée dans un champ de ma table et séparée par un ";"
On en reparle !
+

[Invité]

Bonjour

Voici un exemple de code pour récupérer les données :

Code :

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

1
2
3
4
5
6
7
8
 Dim strResultSelection As String
 Dim i As Integer
 For i = 0 To Me.Liste0.ListCount - 1      
     If Me.Liste0.Selected(i) = True Then
         strResultSelection = Me.Liste0.ItemData(i) & ";" & strResultSelection
     End If
 Next i
 MsgBox Left(strResultSelection, Len(strResultSelection) - 1)

Ensuite, avec une requête de type Insert pour mettre dans ta table.

Philippe