Discussion :

[kadoche]

Bonjour, je cherche comment insérer un compteur de lignes dans une requête avec une réinitialisation à zéro lors du changement de code client.

NUM_CLIENT_LIV	NUM_FILIERE	FILIERE_PRINCIPALE	ListePrio
010042	010042	0	DIRECT
010042	010042VWA	1	GJL

j'ai des informations en colonne et je les souhaite en ligne, impossible une requête analyse croisée.

le résultat attendu est :

010042

010042 direct 010042vwa gjl

etc ....

par avance merci pour votre aide

[EricDgn]

Bonjour,

Cette demande me semble correspondre à ceci: Concaténer plusieurs enregistrements dans une seule colonne

Cordialement.

[kadoche]

Bonjour,

Cette demande me semble correspondre à ceci: Concaténer plusieurs enregistrements dans une seule colonne

Cordialement.

bonjour

en faite ce que je souhaite c est que le résultat soit dans des colonnes séparées

010042 010042 / direct / 010042vwa / gjl / etc ....

je ne peux donc pas faire une concaténation

[EricDgn]

Bonjour,

Donc une ligne pour chaque code client (NUM_CLIENT_LIV) et nombre de colonnes indéterminé (pouvant varier selon le code client) ?

Cordialement.

[hyperion13]

Salut
Vous allez devoir récupérer cette fonction et la copier dans un module standard.
Après quoi à l'aide d'une query obtenir le résultat attendu.
Code à adapter selon votre IHM.

Code :

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

1
2
SELECT DISTINCT Table1.NUM_CLIENT_LIV, ConcatRelated("NUM_FILIERE &' '& ListePrio","Table1","NUM_CLIENT_LIV = '" & [NUM_CLIENT_LIV] & "'") AS Concat
FROM Table1;

[kadoche]

Bonjour,

Donc une ligne pour chaque code client (NUM_CLIENT_LIV) et nombre de colonnes indéterminé (pouvant varier selon le code client) ?

Cordialement.

bonjour

non le nombre de colonne est fixe 4 colonnes par contre le nombre de lignes par NUM_CLIENT_LIV peut varié soit 1 ou 2 ou 3 ou 4

cordialement

[EricDgn]

Bonjour,

Quand j'indiquais "nombre de colonnes indéterminé (pouvant varier selon le code client) ", cela concernait le nombre de colonnes dans la requête résultat. Comme vous venez d'indiquer que "le nombre de lignes par NUM_CLIENT_LIV peut varier soit 1 ou 2 ou 3 ou 4", en résultat il y aura donc 9 colonnes. Voir si la requête résultat q_0123 dans la bdd jointe correspond à cela. J'ai considéré que le nombre entré dans le champ FILIERE_PRINCIPALE varie entre 0 et 3.

Cordialement.

[kadoche]

Bonjour,

Quand j'indiquais "nombre de colonnes indéterminé (pouvant varier selon le code client) ", cela concernait le nombre de colonnes dans la requête résultat. Comme vous venez d'indiquer que "le nombre de lignes par NUM_CLIENT_LIV peut varier soit 1 ou 2 ou 3 ou 4", en résultat il y aura donc 9 colonnes. Voir si la requête résultat q_0123 dans la bdd jointe correspond à cela. J'ai considéré que le nombre entré dans le champ FILIERE_PRINCIPALE varie entre 0 et 3.

Cordialement.

Bonjour

Merci pour la base que j ai regardé avec grand intérêt , mais cela ne correspond pas a ce que je souhaiterais peut être un est ce impossible


et voici a quoi je souhaiterais arriver


mon idée première était de créer un compteur de ligne qui se réinitialise a chaque changement de NUM_CLIENT LIV

ce qui donnerais dans une requête
010020 1
010042 1
010042 2
020248 1
020248 2
020248 3

puis après par requête je sélectionne les 1 dans une requête les 2 dans une autre ainsi de suite puis je regroupe le tout dans une requête.

mais c est ce compteur que je ne sais pas comme faire la fonction pour arrivé a ce résultat.

cordialement

[EricDgn]

Bonjour,

Il est possible de créer un "compteur" pour autant que la table contienne un champ "sans doublon" (en général le champ identifiant). Dans l'exemple attaché, dans la requête qN, le champ n° étant sans doublon, N est le compteur:

Code :

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

N: CpteDom("*";"Table1";"Num_Client_Liv='" & [Num_Client_Liv] & "' And n° <" & [n°])

Cordialement.

[kadoche]

voila après des recherche j'ai enfin réussi a trouver le code qui correspond a ceux que je voulais

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
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Public Sub Numeroter()
  Dim rs As Recordset
  Dim sRupture As String
  Dim i As Integer
  'Purger table  T_filiere
 
  DoCmd.SetWarnings False
 
  DoCmd.RunSQL "DELETE [T_filiere].NbreLigne FROM [T_filiere];"
  'copier le contenu de table source dans T_Filiere
  DoCmd.OpenQuery "Non table Creation"
  DoCmd.SetWarnings True
  'Lire dans l'ordre et numéroter
  Set rs = CurrentDb.OpenRecordset("SELECT [T_filiere].* " _
                                   & "FROM [T_filiere] " _
                                         & "ORDER BY T_filiere.NUM_CLIENT_LIV,T_filiere.NUM_FILIERE;")
  sRupture = rs("NUM_CLIENT_LIV")
  i = 1
 
  Do Until rs.EOF
    rs.Edit
    If rs("NUM_CLIENT_LIV") = sRupture Then
        rs("NbreLigne") = Format(i, "#")
        i = i + 1
      Else
        sRupture = rs("NUM_CLIENT_LIV")
        rs("NbreLigne") = "1"
        i = 2
    End If
    rs.Update
    rs.MoveNext
  Loop
  'fermer
  rs.Close
  Set rs = Nothing
End Sub