Discussion :

[epistol]

ACCESS 2003
Bonjour,
a priori le pb est très simple:
il est très facile dans une requête avec regroupement de sommer les champs regroupés (sum), d'en faire le compte (count), etc.. pour des champs "nombres".
Si les champs regroupés sont de type "string", on a facilement le premier ou le dernier enregistrement (first ou last)....
Mais ce que je veux faire c'est CONCATENER tous les enregistrement regroupés (l'équivalent de somme pour des nombres).

Je ne trouve pas comment le faire.....

Merci pour votre aide.

[Heureux-oli]

Pour obtenir une concaténation, c'est n'est pas une requête qu'il faut mais passer par un recordset.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
Sub ChampEnCol()
Dim rs As DAO.Recordset
Dim db As DAO.Database
Dim sql As String
Dim result As String
 
sql = "select * from tblnom"
 
Set db = CurrentDb
Set rs = db.OpenRecordset(sql)
While Not rs.EOF
    result = result & rs.Fields("nom") & "*"
    rs.MoveNext
Wend
Debug.Print result
set rs = nothing
set db = nothing
 
End Sub

Mais dans les codes sources du site, tu trouveras aussi ce que tu cherche.
Ici

[epistol]

Merci de cette réponse claire.

J'ai effet trouvé des exemples de code sur le site, et je vais m'y mettre.

Je suis surpris que les développeurs du programme de base n'ait pas inclus cette fonction directement dans leur programme.