Power Query Copier étapes transformation tableau

Créer une discussion
Répondre
  • Initiateur de la discussion Initiateur de la discussion Etoto
  • Date de début Date de début

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
Etoto

Etoto

XLDnaute Barbatruc
Supporter XLD
Bonjour,

Est-ce possible de copier les étapes appliquées sur un tableau dans PQ vers un autre tableau. Faire que le tableau fasse exactement les même étapes de transformation sur un autre tableau.

Est-ce possible ? Parce que j'ai un tableau sur chaque mois d'une année et je voudrais savoir si y'a un moyen d'éviter de faire de répétitions.

PS : J'essaie de mettre mon fichier en ordre avant de vous le joindre.
 
Solution
chris
RE
VB: 
let
    Source = Web.Page(Web.Contents("https://www.sfl.ch/fr/superleague/calendrier/saison/archiveseason/202122/sorting/date/")),
    #"Lignes filtrées" = Table.SelectRows(Source, each ([Source] = "Table")),
    #"Autres colonnes supprimées" = Table.SelectColumns(#"Lignes filtrées",{"Caption", "Data"}),
    Source2 = Table.ExpandTableColumn(#"Autres colonnes supprimées", "Data", {"Column1", "Column2", "Column3", "Column4", "Column5"}, {"Column1", "Column2", "Column3", "Column4", "Column5"}),
    #"Fractionner la colonne par délimiteur" = Table.SplitColumn(Source2, "Column1", Splitter.SplitTextByEachDelimiter({"#(tab)"}, QuoteStyle.Csv, true), {"Column1.1", "Date"}),
    #"Valeur remplacée" = Table.ReplaceValue(#"Fractionner la colonne...
Trier par date Trier par votes
Bonjour

Vous compliquez inutilement les choses il me semble

  • on peut copier une requête,
  • on peut passer un nom de fichier en paramètre à une requête
  • une requête peut s'appliquer à un ensemble de tableaux
  • on peut transformer une requête en fonction et l'appliquer à d'autres tableaux
  • ...
alors quel intérêt de passer par du VBA ?
 
Vote positif 0 Vote négatif
chris à dit:
Bonjour

Vous compliquez inutilement les choses il me semble

  • on peut copier une requête,
  • on peut passer un nom de fichier en paramètre à une requête
  • une requête peut s'appliquer à un ensemble de tableaux
  • on peut transformer une requête en fonction et l'appliquer à d'autres tableaux
  • ...
alors quel intérêt de passer par du VBA ?
Cliquez pour agrandir...
L'intérêt est que l'enregistreur de macro transpose les actions effectuées dans PQ.
Je ne connais pas le langage M et je ne suis pas super calé non plus avec cet outil, j'ai juste les bases.
Du coup j'amène une solution avec ce que je sais faire, et ce que j'ai pu déjà expérimenter 🙂
A +
 
Vote positif 0 Vote négatif
RE

En plus les tables ne sont pas homogènes selon les mois
  • Novembre et Décembre pas d'info buts
  • Avril : la colonne contenant la date n'est pas au même format
  • Janvier, Février, Mars, Avril, Mai : même PB sur la date + pas d'infos buts
donc déjà il faut traiter autrement les colonnes où on récupère date et buts.
A part cela a requête actuelle peut aussi être nettement simplifiée...

Est-il utile d'avoir autant de tableaux que de mois, plutôt qu'un tableau unique après l'indication de la période (Caption sur la source) ?
 
Dernière édition:
Vote positif 0 Vote négatif
Salut le fofo,


Pourquoi faire simple quand on peut faire compliqué?

J'ai un fichier qui possède un certain nombre de tables IDENTIQUES AU NIVEAU DE LA STRUCTURE.

je crée un query qui se connecte a ce document.
j'alimine les étapes autres quela connection ce qui me montre le contenu du fichier (sheets, tables, named ranges,...)

Je filtre pour garder les tables.
je les ouvre et C'EST FINI...

PS: les tableaux de ton fichier ne sont pas semblables... et ne peuvent pas être mis ensembles.
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Bonjour à tous,
Désolé, j'avais des cours hier.
chris à dit:
Est-il utile d'avoir autant de tableaux que de mois, plutôt qu'un tableau unique après l'indication de la période (Caption sur la source) ?
Cliquez pour agrandir...
Le problème est que sur le site source, les données sont séparées par mois. Et j'avais demandé sur un autre fil comment faire pour fusionner des requêtes et j'ai eu une solution par VBA venant de @Lolote83. Je sais pas s'il existe une solution depuis PQ directement. Parce que c'est mon objectif final de fusionner les tableaux et j'ai la macro de @Lolote83 qui le fait.
Wayki à dit:
Ci-joint ma proposition,
Il faut entrer un nom de requête qui n'existe pas déjà en premier lieu,
Puis rentrer le numéro de la table correspondante dans un second temps,
Le tableau vient se greffer à la suite du précédent.
Cliquez pour agrandir...
Super, je vais tester tout de suite.
merinos à dit:
je crée un query qui se connecte a ce document.
j'alimine les étapes autres quela connection ce qui me montre le contenu du fichier (sheets, tables, named ranges,...)

Je filtre pour garder les tables.
je les ouvre et C'EST FINI...
Cliquez pour agrandir...
Je vais aussi voir ta proposition. Merci
MP59 à dit:
#"Type modifié" = Table.TransformColumnTypes(Data10,{{"Column1", type text}, {"Column2", type time}, {"Column3", type text}, {"Column4", type time}, {"Column5", type text}}),
avec la virgule à la fin
et non
#"Type modifié" = Table.TransformColumnTypes(Data10,{{"Column1", type text}, {"Column2", type text}, {"Column3", type text}, {"Column4", type text}, {"Column5", type text}})
Cliquez pour agrandir...
Super. Merci
 
Vote positif 0 Vote négatif
Re,

Je vous transmet mes résultats :

Pour le code de @MP59, j'ai une erreur "Expression.SyntaxError : Jeton Comma attendu."

Code: 
let
    Source = Web.Page(Web.Contents("https://www.sfl.ch/fr/superleague/calendrier/saison/archiveseason/202122/sorting/date/")),
    Data10 = Source{10}[Data],
    #"Type modifié" = Table.TransformColumnTypes(Data10,{{"Column1", type time}, {"Column2", type time}, {"Column3", type text}, {"Column4", type text}, {"Column5", type text}})
    #"Derniers caractères insérés" = Table.AddColumn(#"Type modifié", "Derniers caractères", each Text.End([Column1], 8), type text),
    #"Colonnes permutées" = Table.ReorderColumns(#"Derniers caractères insérés",{"Column1", "Derniers caractères", "Column2", "Column3", "Column4", "Column5"}),
    #"Colonnes supprimées" = Table.RemoveColumns(#"Colonnes permutées",{"Column1"}),
    #"Type modifié1" = Table.TransformColumnTypes(#"Colonnes supprimées",{{"Derniers caractères", type date}}),
    #"Colonnes supprimées1" = Table.RemoveColumns(#"Type modifié1",{"Column2"}),
    #"Colonnes renommées" = Table.RenameColumns(#"Colonnes supprimées1",{{"Column3", "Equipe dom"}, {"Column5", "Equipe ext"}, {"Derniers caractères", "Date"}}),
    #"Colonnes permutées1" = Table.ReorderColumns(#"Colonnes renommées",{"Date", "Equipe dom", "Equipe ext", "Column4"}),
    #"Premiers caractères insérés" = Table.AddColumn(#"Colonnes permutées1", "Premiers caractères", each Text.Start(Text.From([Column4], "fr-CH"), 2), type text),
    #"Colonnes renommées1" = Table.RenameColumns(#"Premiers caractères insérés",{{"Premiers caractères", "But dom"}}),
    #"Derniers caractères insérés1" = Table.AddColumn(#"Colonnes renommées1", "Derniers caractères", each Text.End(Text.From([Column4], "fr-CH"), 2), type text),
    #"Colonnes renommées2" = Table.RenameColumns(#"Derniers caractères insérés1",{{"Derniers caractères", "But ext"}}),
    #"Type modifié2" = Table.TransformColumnTypes(#"Colonnes renommées2",{{"But dom", Int64.Type}, {"But ext", Int64.Type}}),
    #"Colonnes supprimées2" = Table.RemoveColumns(#"Type modifié2",{"Column4"})
in
    #"Colonnes supprimées2"

Pour le fichier de @Wayki, c'est parfait ! Tu saurais comment faire une macro pour après fusionner les tableaux ou pas ?

Merci à vous tous.
 
Vote positif 0 Vote négatif
Encore re, (désolé)

J'ai remarqué qu'après 2022, les date savaient un "*" à la fin. J'i donc modifié les étapes, voici les nouvelles qui se trouvent sur la requête de la feuille "Après 2022". Encore merci à tous pour votre aide ! Si il existe pas de solution, je peux recréer les étapes manuellement, cela me dérange pas.
 

Pièces jointes

Vote positif 0 Vote négatif
MP59 à dit:
Pour le code de @MP59, j'ai une erreur "Expression.SyntaxError : Jeton Comma attendu."

J'avais pourtant bien précisé : avec la virgule à la fin.
Cliquez pour agrandir...
Ha ! Cette virgule 🤣 🤣 J'avais pas compris que tu parlais de cette fin. Je pensais que tu parlais de la virgule à la fin du "type time". Désolé, j'ai été un peu stupide ! Et ça fonctionne nickel !! Faut juste que je l'adapte au post 23. C'est fonctionnel pour chaque mois du coup ?

EDIT : C'est bon, j'ai réussi. Je reviens ici si je rencontre d'autres problèmes. Merci à tous !
 
Vote positif 0 Vote négatif
chris à dit:
Bonjour

Mais avec PowerQuery justement c'est beaucoup plus simple de récupérer d'un coup l'ensemble des mois que découper comme tu l'as fait.

Aucun besoin de VBA comme la plupart du temps avec PowerQuery à part une ligne si on veut actualiser automatiquement dans certains cas...
Cliquez pour agrandir...
Alors, j'aimerai bien connaître la méthode parce que j'ai eu que la version VBA moi, pas PQ.
 
Vote positif 0 Vote négatif
RE
VB: 
let
    Source = Web.Page(Web.Contents("https://www.sfl.ch/fr/superleague/calendrier/saison/archiveseason/202122/sorting/date/")),
    #"Lignes filtrées" = Table.SelectRows(Source, each ([Source] = "Table")),
    #"Autres colonnes supprimées" = Table.SelectColumns(#"Lignes filtrées",{"Caption", "Data"}),
    Source2 = Table.ExpandTableColumn(#"Autres colonnes supprimées", "Data", {"Column1", "Column2", "Column3", "Column4", "Column5"}, {"Column1", "Column2", "Column3", "Column4", "Column5"}),
    #"Fractionner la colonne par délimiteur" = Table.SplitColumn(Source2, "Column1", Splitter.SplitTextByEachDelimiter({"#(tab)"}, QuoteStyle.Csv, true), {"Column1.1", "Date"}),
    #"Valeur remplacée" = Table.ReplaceValue(#"Fractionner la colonne par délimiteur","*","",Replacer.ReplaceText,{"Date"}),
    #"Fractionner la colonne par délimiteur1" = Table.SplitColumn(#"Valeur remplacée", "Column4", Splitter.SplitTextByDelimiter(":", QuoteStyle.Csv), {"But Dom", "But Ext"}),
    #"Colonnes supprimées" = Table.RemoveColumns(#"Fractionner la colonne par délimiteur1",{"Column1.1", "Column2"}),
    #"Valeur remplacée1" = Table.ReplaceValue(#"Colonnes supprimées","-","",Replacer.ReplaceText,{"But Dom", "But Ext"}),
    #"Type modifié" = Table.TransformColumnTypes(#"Valeur remplacée1",{{"Column3", type text}, {"Column5", type text}, {"Date", type date}, {"But Dom", Int64.Type}, {"But Ext", Int64.Type}}),
    #"Colonnes renommées" = Table.RenameColumns(#"Type modifié",{{"Column3", "Equipe dom"}, {"Column5", "Equipe ext"}}),
    #"Colonnes permutées" = Table.ReorderColumns(#"Colonnes renommées",{"Date", "Equipe dom", "Equipe ext", "But Dom", "But Ext"})
in
    #"Colonnes permutées"

c'est tout
 
Vote positif 0 Vote négatif
Solution
chris à dit:
RE
VB: 
let
    Source = Web.Page(Web.Contents("https://www.sfl.ch/fr/superleague/calendrier/saison/archiveseason/202122/sorting/date/")),
    #"Lignes filtrées" = Table.SelectRows(Source, each ([Source] = "Table")),
    #"Autres colonnes supprimées" = Table.SelectColumns(#"Lignes filtrées",{"Caption", "Data"}),
    Source2 = Table.ExpandTableColumn(#"Autres colonnes supprimées", "Data", {"Column1", "Column2", "Column3", "Column4", "Column5"}, {"Column1", "Column2", "Column3", "Column4", "Column5"}),
    #"Fractionner la colonne par délimiteur" = Table.SplitColumn(Source2, "Column1", Splitter.SplitTextByEachDelimiter({"#(tab)"}, QuoteStyle.Csv, true), {"Column1.1", "Date"}),
    #"Valeur remplacée" = Table.ReplaceValue(#"Fractionner la colonne par délimiteur","*","",Replacer.ReplaceText,{"Date"}),
    #"Fractionner la colonne par délimiteur1" = Table.SplitColumn(#"Valeur remplacée", "Column4", Splitter.SplitTextByDelimiter(":", QuoteStyle.Csv), {"But Dom", "But Ext"}),
    #"Colonnes supprimées" = Table.RemoveColumns(#"Fractionner la colonne par délimiteur1",{"Column1.1", "Column2"}),
    #"Valeur remplacée1" = Table.ReplaceValue(#"Colonnes supprimées","-","",Replacer.ReplaceText,{"But Dom", "But Ext"}),
    #"Type modifié" = Table.TransformColumnTypes(#"Valeur remplacée1",{{"Column3", type text}, {"Column5", type text}, {"Date", type date}, {"But Dom", Int64.Type}, {"But Ext", Int64.Type}}),
    #"Colonnes renommées" = Table.RenameColumns(#"Type modifié",{{"Column3", "Equipe dom"}, {"Column5", "Equipe ext"}}),
    #"Colonnes permutées" = Table.ReorderColumns(#"Colonnes renommées",{"Date", "Equipe dom", "Equipe ext", "But Dom", "But Ext"})
in
    #"Colonnes permutées"

c'est tout
Cliquez pour agrandir...
Super ! Pour éviter de faire une bourde, je place ce code dans l'éditeur de quel tableau ?
 
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

eastwick
  • Résolu(e)
XL 2016 copier la même ligne sur la dernière ligne vierge d'un tableau
Réponses
8
Affichages
193
eastwick
eastwick
treza88
  • Question Question
XL 2021 Encadrement de cellule sur tableau dynamique
2
Réponses
21
Affichages
897
Phil69970
Phil69970
J
  • Question Question
Microsoft 365 Naviguer dans un tableau pour copier des données dans un modèle et copier l'un derrière l'autre
Réponses
11
Affichages
403
AtTheOne
AtTheOne
thunder23
  • Question Question
XL 2021 Mise à jour d'un tableau depuis une feuille Excel
Réponses
5
Affichages
286
thunder23
thunder23
P
  • Résolu(e)
XL 2019 Tri sur une ligne dans un tableau.
Réponses
4
Affichages
265
Paulle
P
T
  • Question Question
XL 2019 Validation par étapes et par différentes personnes Formule ou Macro
5 6 7
Réponses
104
Affichages
5 K
cp4
cp4
7
  • Question Question
Microsoft 365 Tableau de Géolocalisation de vidéos de drone avec lien vers Google Earth
2
Réponses
15
Affichages
884
sylvanu
sylvanu
O
  • Question Question
XL 2016 transférer les données d'un tableau brut, dans un autre format pour analyse.
Réponses
12
Affichages
596
ORL
O
E
  • Question Question
Power Query Index TP de l'INSEE - Ajuster une formule à chaque mise à jour d'un tableau généré avec PQ
2
Réponses
21
Affichages
1 K
laurent950
laurent950
S
  • Résolu(e)
XL 2013 Copier-Coller une ligne dans tableau variable, et la manipuler.
Réponses
4
Affichages
268
StéphaneDeLà
S
N
  • Résolu(e)
XL 2019 Macro pour copier ligne avec case à cocher liée
Réponses
12
Affichages
396
Phil69970
Phil69970
C
  • Question Question
Autres RESOLU synthèse d'un tableau
Réponses
9
Affichages
511
chapipi
C
C
  • Résolu(e)
XL 2016 VBA : inversion de Date sur Range.Resize ... = Tableau après Transpose du Tableau
Réponses
2
Affichages
290
crocrocro
C
M
  • Question Question
XL 2010 Récupération de données et les transformer avec Power Query ?
Réponses
3
Affichages
692
DJunqueira
D
S
  • Résolu(e)
XL 2010 tableau de cumul automatisé
Réponses
13
Affichages
590
stefiskool
S
A
  • Question Question
XL 2019 copier un tableau Excel dans un document word
Réponses
2
Affichages
423
chris
chris
D
  • Question Question
Microsoft 365 Copier avec liaison mais en intégrant les mois de production
Réponses
1
Affichages
144
sioum
S
M
  • Question Question
XL 2019 Copier des lignes les unes a la suite des autres dans une autre feuille sous conditions et seulement certaines colonnes
Réponses
7
Affichages
818
MGH
M
D
  • Résolu(e)
Microsoft 365 Macro pour rafraîchir les liaisons
Réponses
11
Affichages
548
AtTheOne
AtTheOne
J
  • Résolu(e)
XL 2019 Détection de texte dans une Cellule pour le Copier et Coller dans un autre tableau
2 3
Réponses
40
Affichages
2 K
Phil69970
Phil69970
Retour