Recup de donnees de liste modifiable ss access

Salut a tous, voila g un peti prob, en fait je voudrais recuperer la valeur contenue dans une zone de liste modifiable pour pouvoir ouvrir un formulaire correspondant j'ai ecrit qqes lignes :

Function Liste() As String

Dim sBuffer As String
Dim var As String
Dim lSize As Long

' Allocation de la taille du buffer de réception
sBuffer = Space$(250)
lSize = Len(sBuffer)

var = List1.Text
If var = "Documents" Then
DoCmd.OpenForm "F_Document"
End If
End Function

ms ça ne march pas.
Merci d'avance pour votre aide !!

Bonjour,

Déjà, ces lignes là n'ont aucune utilité :

' Allocation de la taille du buffer de réception
sBuffer = Space$(250)
lSize = Len(sBuffer)

Ensuite, il faut que tu vérifies la valeur contenue dans ta liste, pour ceci, utilise l'espion ou marque un point d'arrêt sur la ligne suivante :

If var = "Documents" Then

à tous les coups, var = "Document".

Sinon, je ne vois pas où peut être le souci.

Caroline


-------------------------------
Réponse au message :
-------------------------------

Salut a tous, voila g un peti prob, en fait je voudrais recuperer la valeur contenue dans une zone de liste modifiable pour pouvoir ouvrir un formulaire correspondant j'ai ecrit qqes lignes :

Function Liste() As String

Dim sBuffer As String
Dim var As String
Dim lSize As Long

' Allocation de la taille du buffer de réception
sBuffer = Space$(250)
lSize = Len(sBuffer)

var = List1.Text
If var = "Documents" Then
DoCmd.OpenForm "F_Document"
End If
End Function

ms ça ne march pas.
Merci d'avance pour votre aide !!