Power Query Power Query Gestion tableau

Créer une discussion
Répondre

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
G

guypont

XLDnaute Nouveau
Bonjour,
Dans le tableau joint, je souhaiterai obtenir le résultat suivant :

- Les n° de Compte dans la colonne CpteHT (TVA).Cpte doivent se retrouver dans le colonne Code Encaisst TVA.
- Les montants de la colonne Crédits HT doivent correspondre aux n° de compte de la colonne CpteHT (TVA).Cpte et se retrouver dans la colonne Crédit HT

Exemple résultat souhaité : Tableau joint avec les chiffres en rouge à bouger


Avez-Vous une solution ?

Merci
 

Pièces jointes

  • Capture d'écran 2026-02-25 150607.png
    Capture d'écran 2026-02-25 150607.png
    120.4 KB · Affichages: 14
  • Capture d'écran 2026-02-25 151128.png
    Capture d'écran 2026-02-25 151128.png
    19 KB · Affichages: 15
Trier par date Trier par votes
Bonjour,
Pour les noms des étapes, je les renomme tout simplement (clic droit sur l'étape, à gauche, "renommer")
Pour les étapes (mes commentaires en orange, dans les lignes précédées d'un double slash) :

PowerQuery: 
let
    // Chargement du tableau nommé "Tableau1_1"
    Source = Excel.CurrentWorkbook(){[Name="Tableau1_1"]}[Content],

    // Je transforme le type des données dans le tableau, je passe notamment tout ce qui a trait aux numéros de compte en "texte"
    ModType = Table.TransformColumnTypes(Source,{{"Code Encaisst TVA", type text}, {"Date", type date}, {"CpteHT (TVA).Cpte", type text}, {"Crédit HT", type number}, {"Crédit TVA", type number}}),
   
    // Je supprime les lignes dont le contenu de la colonne "Code Encaisst TVA" est null
    FiltreNull = Table.SelectRows(ModType, each ([Code Encaisst TVA] <> null)),
   
    //Ici, le gros du boulot...
    //Le regroupement se fait sur les "Code Encaisst TVA" commençant par "44571"
    //Puis, dans ces regroupements, je rajoute un table, dont les colonnes "Code Encaisst TVA" et "Crédit TVA" prennent
    //les valeurs des colonnes "CpteHT (TVA).Cpte" et "Crédit HT"
    //Il faut donc bien vérifier que ces colonnes sont bien nommées telles que dans ce code
    GoupBy = Table.Group(FiltreNull, {"Code Encaisst TVA"}, {{"Tbl", each _
                & #table({"Code Encaisst TVA","Crédit TVA"},{{[#"CpteHT (TVA).Cpte"]{0},[Crédit HT]{0}}})}},
                GroupKind.Local , (s,c) => Number.From(Text.StartsWith(c[Code Encaisst TVA], "44571")))[[Tbl]],
   
    //Je développe les colonnes qui sont nécessaires
    #"Tbl développé" = Table.ExpandTableColumn(GoupBy, "Tbl", {"Date", "Code Encaisst TVA", "Débit Encaissements", "Crédit TVA"}, {"Date", "Code Encaisst TVA", "Débit Encaissements", "Crédit TVA"}),
   
    //Et je redéfinis le typage des données
    #"Type modifié" = Table.TransformColumnTypes(#"Tbl développé",{{"Date", type date}, {"Code Encaisst TVA", type text}, {"Débit Encaissements", type number}, {"Crédit TVA", type number}})
in
    #"Type modifié"

Tu dis si tu n'y arrives toujours pas
 
Vote positif 0 Vote négatif
Cousinhub à dit:
Bonjour,
Pour les noms des étapes, je les renomme tout simplement (clic droit sur l'étape, à gauche, "renommer")
Pour les étapes (mes commentaires en orange, dans les lignes précédées d'un double slash) :

PowerQuery: 
let
    // Chargement du tableau nommé "Tableau1_1"
    Source = Excel.CurrentWorkbook(){[Name="Tableau1_1"]}[Content],

    // Je transforme le type des données dans le tableau, je passe notamment tout ce qui a trait aux numéros de compte en "texte"
    ModType = Table.TransformColumnTypes(Source,{{"Code Encaisst TVA", type text}, {"Date", type date}, {"CpteHT (TVA).Cpte", type text}, {"Crédit HT", type number}, {"Crédit TVA", type number}}),
  
    // Je supprime les lignes dont le contenu de la colonne "Code Encaisst TVA" est null
    FiltreNull = Table.SelectRows(ModType, each ([Code Encaisst TVA] <> null)),
  
    //Ici, le gros du boulot...
    //Le regroupement se fait sur les "Code Encaisst TVA" commençant par "44571"
    //Puis, dans ces regroupements, je rajoute un table, dont les colonnes "Code Encaisst TVA" et "Crédit TVA" prennent
    //les valeurs des colonnes "CpteHT (TVA).Cpte" et "Crédit HT"
    //Il faut donc bien vérifier que ces colonnes sont bien nommées telles que dans ce code
    GoupBy = Table.Group(FiltreNull, {"Code Encaisst TVA"}, {{"Tbl", each _
                & #table({"Code Encaisst TVA","Crédit TVA"},{{[#"CpteHT (TVA).Cpte"]{0},[Crédit HT]{0}}})}},
                GroupKind.Local , (s,c) => Number.From(Text.StartsWith(c[Code Encaisst TVA], "44571")))[[Tbl]],
  
    //Je développe les colonnes qui sont nécessaires
    #"Tbl développé" = Table.ExpandTableColumn(GoupBy, "Tbl", {"Date", "Code Encaisst TVA", "Débit Encaissements", "Crédit TVA"}, {"Date", "Code Encaisst TVA", "Débit Encaissements", "Crédit TVA"}),
  
    //Et je redéfinis le typage des données
    #"Type modifié" = Table.TransformColumnTypes(#"Tbl développé",{{"Date", type date}, {"Code Encaisst TVA", type text}, {"Débit Encaissements", type number}, {"Crédit TVA", type number}})
in
    #"Type modifié"

Tu dis si tu n'y arrives toujours pas
Cliquez pour agrandir...
Merci pour tes explications....mais

Problème sur le GoupBy

Comment saisir la formule (en la modifiant pour les intitulés) dans la barre de formule sans impacter l'étape précédente. Comment xcréer cette étape ?
J'ai essayé de passer par le menu "Transformer / Regrouper par" mais la fenêtre apparemment ne me permet pas de saisir les paramètres auxquels tu fais allusion
 
Vote positif 0 Vote négatif
Re,
Effectivement, je n'utilise pas l'interface à proprement parler, mais je saisis directement le code.
Le plus simple est d'aller dans l'éditeur avancé, et de modifier.
1772106410198.png


Tu copies ma formule, tu fais bien attention que le GroupBy référence l'étape précédente (FiltreNull dans mon code), et tu mets les bons noms de colonne. Attention, si le nom comporte des caractères spéciaux, il faut borner par #"nom_de_la colonne" (# suivi d'un guillemet, puis le nom, et un guillemet pour fermer) comme [#"CpteHT (TVA).Cpte"].
De plus, comme tu peux le voir, cette instruction est terminée par [[Tbl]], ce qui permet de ne conserver que cette colonne.
Si tu as déjà réussi à atteindre cette étape, poste ici ton code, et on complètera au fur et à mesure.
 
Vote positif 0 Vote négatif
Cousinhub à dit:
Re,
Effectivement, je n'utilise pas l'interface à proprement parler, mais je saisis directement le code.
Le plus simple est d'aller dans l'éditeur avancé, et de modifier.
Regarde la pièce jointe 1228159

Tu copies ma formule, tu fais bien attention que le GroupBy référence l'étape précédente (FiltreNull dans mon code), et tu mets les bons noms de colonne. Attention, si le nom comporte des caractères spéciaux, il faut borner par #"nom_de_la colonne" (# suivi d'un guillemet, puis le nom, et un guillemet pour fermer) comme [#"CpteHT (TVA).Cpte"].
De plus, comme tu peux le voir, cette instruction est terminée par [[Tbl]], ce qui permet de ne conserver que cette colonne.
Si tu as déjà réussi à atteindre cette étape, poste ici ton code, et on complètera au fur et à mesure.
Cliquez pour agrandir...
Désolé mais cela ne fonctionne pas pour moi.
J'ai bien remplacé les noms de colonnes par celles concernant mon tableau.
J’obtiens un message d'erreur.
Je te joins les 2 photos des fichiers concernés

Si besoin, je peux t'envoyer mon fichier pour intervention direct de ta part
 

Pièces jointes

  • Capture d'écran 2026-02-26 145325.png
    Capture d'écran 2026-02-26 145325.png
    7.4 KB · Affichages: 3
  • Capture d'écran 2026-02-26 145259.png
    Capture d'écran 2026-02-26 145259.png
    294.5 KB · Affichages: 3
Vote positif 0 Vote négatif
Bonjour guypont, Cousinhub, le forum,

Voici une solution VBA avec cette macro dans le code de la feuille "Résultat" :
VB: 
Private Sub WorkSheet_Activate()
Dim tablo, ub&, resu(), i&, n&, j&
With [Tableau1_1] 'tableau structuré
    If Not .ListObject.DataBodyRange Is Nothing Then
        tablo = .Value 'matrice, plus rapide
        ub = UBound(tablo)
        ReDim resu(1 To 2 * ub, 1 To 4)
        For i = 1 To ub
            If tablo(i, 3) <> "" Then
                n = n + 1
                resu(n, 1) = tablo(i, 1): resu(n, 2) = tablo(i, 3)
                resu(n, 3) = tablo(i, 4): resu(n, 4) = tablo(i, 5)
                If tablo(i, 6) & tablo(i, 7) <> "" Then
                    For j = i + 1 To ub
                        If tablo(j, 3) <> "" Then
                            If tablo(j, 6) & tablo(j, 7) <> "" Then Exit For
                            n = n + 1
                            resu(n, 1) = tablo(j, 1): resu(n, 2) = tablo(j, 3)
                            resu(n, 3) = tablo(j, 4): resu(n, 4) = tablo(j, 5)
                        End If
                    Next j
                    n = n + 1
                    resu(n, 2) = tablo(i, 7): resu(n, 4) = tablo(i, 6)
                    i = j - 1
                End If
            End If
        Next i
    End If
End With
'---restitution---
With [A2] '1ère cellule de destination
    If n Then .Resize(n, 4) = resu
    .Offset(n).Resize(Rows.Count - n - .Row + 1, 4).ClearContents 'RAZ
End With
With UsedRange: End With 'actualise la barre de défilement verticale
End Sub
Elle s'exécute automatiquement quand on active la feuille, c'est l'avantage par rapport à Power Query.

Edit : tablo(i, 6) & tablo(i, 7) <> "" est un peu plus rapide que tablo(i, 6) <> "" Or tablo(i, 7) <> ""

A+
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Vote positif 0 Vote négatif
Cousinhub à dit:
Re-,
Tu peux copier le code, et le coller ici (en utilisant la balise </>
Regarde la pièce jointe 1228163

Puis le langage "Power Query"
Regarde la pièce jointe 1228164
Cliquez pour agrandir...
PowerQuery: 
# GoupBy = Table.Group(FiltreNull, {#"Cptes Encaisst + TVA"}, {{"Tbl", each _
                & #table({#"Cptes Encaisst + TVA","Crédit TVA"},{{[#"Cpte_HT"]{0},[Crédit HT]{0}}})}},
                GroupKind.Local , (s,c) => Number.From(Text.StartsWith(c[#Cpte Encaisst + TVA], "44571")))[[Tbl]]

Cela te convient
 
Vote positif 0 Vote négatif
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

anthoYS
  • Question Question
XL 2019 Gestion de 4 sources de revenu (A, B, C et D). Et rajout du jour en cours et MEFC qui doit varier selon le mois en cours...
Réponses
8
Affichages
199
sylvanu
sylvanu
L
  • Résolu(e)
Power Query problème avec power query
2
Réponses
16
Affichages
1 K
Linda42
L
D
  • Résolu(e)
Microsoft 365 Assistance pour optimisation d'un code VBA qui ne fonctionne pas comme souhaité
2
Réponses
21
Affichages
972
desto
D
cathodique
  • Résolu(e)
XL 2010 tableau de comptage sans doublon
2 3
Réponses
44
Affichages
2 K
cathodique
cathodique
M
  • Résolu(e)
Microsoft 365 Formule à placer
Réponses
10
Affichages
691
Marvin57
M
L
  • Question Question
Microsoft 365 POWER QUERY : problème "error" sur chiffre plus grand que 999
Réponses
1
Affichages
787
Cousinhub
Cousinhub
W
  • Question Question
XL 2016 Signaler des bilocations du fait d'horaires identiques ou en chevauchement [selon le contenu de la colonne L du fichier]
2 3
Réponses
34
Affichages
1 K
Webperegrino
W
L
  • Résolu(e)
Microsoft 365 Ratio dans un TCD
Réponses
4
Affichages
570
Laurent78
L
D
  • Question Question
XL 2021 Mise en forme automatique de tableaux via vba
Réponses
7
Affichages
1 K
Jacky67
Jacky67
B
  • Résolu(e)
Microsoft 365 Extraction de données 2 classeurs
Réponses
10
Affichages
1 K
yal
Y
Phoenix23
  • Question Question
XL 2016 Chiffrer le nombre de personnes par Mois
Réponses
2
Affichages
499
Phoenix23
Phoenix23
R
  • Question Question
XL 2019 Exclure une ligne d'un calcul si la cellule a côté contient du texte
Réponses
1
Affichages
594
chris
chris
oguruma
EXCEL :: TRIER - TRIER.PAR - SOMMEPROD - CHOISIR - INDEX - SOMME.SI - NB.SI - DECALER - SEQUENCE : Tris dynamiques, regroupements et somme
Réponses
0
Affichages
521
oguruma
oguruma
K
  • Question Question
Microsoft 365 Création d'un journal d'écriture à partir d'un tableau des ventes
2
Réponses
15
Affichages
3 K
CARTER92
C
6
  • Question Question
XL 2019 Générer mails sous conditions
2
Réponses
26
Affichages
2 K
Oneida
Oneida
almas
  • Question Question
XL 2016 Largeur de colonne requête power query
Réponses
3
Affichages
2 K
almas
almas
B
  • Résolu(e)
Microsoft 365 Extraire des données d'un classeur sur un autre classeur
Réponses
9
Affichages
1 K
Bob 31
B
V
  • Résolu(e)
XL 2021 Complétion d'un tableau automatisée
Réponses
9
Affichages
1 K
VincentH.DR
V
S
  • Question Question
XL 2010 Résultats possibles d'une combinaison de nombres
Réponses
2
Affichages
2 K
Stellaire
S
P
  • Question Question
XL 2010 Recherche statut dans tableau
Réponses
2
Affichages
554
Perceval64
P
Retour