Réorganisation de données

jpl81 Messages postés 17 Date d'inscription   Statut Membre Dernière intervention   -  
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour à tous,
Je dispose d'une requête avec 3 colonnes et 3 à 5 lignes se disposant comme suis:
Date n° lot articles
16/11/18 13 bijoux
16/11/18 13 voitures
16/11/18 13 animaux
je cherche la solution pour synthétiser cela en une seule ligne avec mes différents articles en colonne car je souhaite faire une étiquette donnant ainsi:
Date n°lot Art1 Art2 Art3
16/11/18 13 bijoux Voitures Animaux

Ainsi sur la même étiquette, j'ai l'ensemble de mes données alors que dans mon cas j'ai 3 étiquettes

Si quelqu'un a une idée je le remercie par avance pour son amabilité.
Bonsoir

2 réponses

yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 584
 
bonjour, je propose de faire ainsi, en remplaçant jpl81 par le nom de ta table, que tu as omis de mentionner:
tu crées un module dans lequel tu mets ceci:
Option Compare Database
Option Explicit

Function jplcaty(req As String, ch As String) As String
Dim rs As Recordset
Set rs = CurrentDb.OpenRecordset(req)
Do While Not rs.EOF
    If jplcaty = "" Then
        jplcaty = rs.Fields(ch)
    Else
        jplcaty = jplcaty & ", " & rs.Fields(ch)
    End If
    rs.MoveNext
Loop
End Function

tu crées une requête dans laquelle tu mets ceci:
SELECT dt as [Date], nl as [n° lot],
 jplcaty("select articles from jpl81 where format([Date],'yyyymmdd') = '" & format(dt,"yyyymmdd") & "' and [n° lot]= " & nl,"articles" )
FROM (select distinct [Date] as dt, [N° lot] as nl from jpl81)
;
puis tu exécutes la requête.
0
jpl81 Messages postés 17 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,
Je tiens à vous remercier de votre réponse, mais là c'est vraiment au dessus de mes compétences,
Personnellement j'utilise ACCESS avec les fonctions de base c'est à dire les boutons à ma disposition dans la barre du haut,
Je ne connait pas la notion de Module, pouvez vous m'expliquer plus simplement car je sais pas du tout comment accéder à ses fonctions? Est ce dans la requête ou ailleurs?
Je sais pas non plus si votre programmation correspond bien à ma recherche,
Désolé d'être aussi ignorant ou limité mais je suis un simple utilisateur d'ACCESS qui aimerait résoudre ses interrogations mais aussi comprendre ce qu'il fait afin de pouvoir refaire les choses,
Je vous remercie
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584
 
dans la barre du haut, sous "créer", tu vas trouver un bouton "module".
0