Bonjour à tous,
Je souhaite adapter ce code sous access 2010 :
Public Function RecupParticipant(Projet As Long) As String
Dim res As DAO.Recordset
Dim SQL As String
'Selectionne les participant du projet
SQL = "SELECT NomParticipant FROM Tbl_Projet
Set res = CurrentDb.OpenRecordset(SQL)
'Concatene les différents enregistrement
While Not res.EOF
RecupParticipant = RecupParticipant & res.Fields(0).Value & " "
res.MoveNext
Wend
'Enleve le dernier espace
RecupParticipant = Left(RecupParticipant, Len(RecupParticipant) - 1)
'libere la mémoire
Set res = Nothing
End Function
Issu de ce lien :http://access.developpez.com/sources/?page=Requete
Le problème c'est que mon champ "PROJET" ne comporte pas de chiffres mais du texte et lorsque j'exécute la requête suivante j'ai le message d'erreur : "type de données incompatibles dans l'expression du caractères" . Comment faire pour l'adapter ?
La requête :
SELECT DISTINCT Tbl_projet.Projet, Recupparticipant(Projet) AS LesParticipants
FROM Tbl_projet;
Merci d'avance
Partager