XL 2019 Améliorer le temps de recalcul

sylvanu à dit:

Re St, Job,
J'ai enfin compris la philosophie.
Une V3. Si Need on les les Own. Si Own on liste les Need.
Par contre je ne sais pas quoi faire des Collected.
Mais au moins ça avance.

Cliquez pour agrandir...

Hasco à dit:

Bonjour,

J'ai peut-être pas tout compris, mais voici deux requêtes
La première se contente de filtrer sur les critères en A1:A3
A1:A3 => Nommé "Critères"
La deuxième qui ensuite ramène et compte tous les players qui ne sont pas c ("Own ou collected ou needed")

La mise à jour est faite lorsqu'un critère de A1:A3 change si les 3 critères sont présents.

Attention dans vos données vous avez des espaces trainantes "Own " ou "Own " au lieu de "Own" idem pour les autres valeurs. Si vous ne corrigez pas vous pouvez faire la sélection des lignes par Text.StartsWith, comme dans le fichier joint ou Text.Contains.
Mais l'égalité est toujours préférable quand on veut gagner en temps d'exécution.

Cordialement

Cliquez pour agrandir...

let
    Source = Excel.CurrentWorkbook(),
    Critere = Source{[Name = "Criteres"]}[Content]{0}[Column3],
    Tableau = "Tableau" & Source{[Name = "Criteres"]}[Content]{0}[Column1],
    Player = Source{[Name = "Criteres"]}[Content]{0}[Column2],
    Datas = Source{[Name=Tableau]}[Content],
    Résultat = Table.SelectRows(Datas, each Text.StartsWith(Record.Field(_,Player), Critere)),
    Personnalisé1 = Table.SelectColumns(Résultat,{"REC","LOCO"} & List.Select(Table.ColumnNames(Résultat),each Text.StartsWith(_,"Player"))),
    #"Supprimer le tableau croisé dynamique des autres colonnes" = Table.UnpivotOtherColumns(Personnalisé1, {"REC", "LOCO"}, "Player", "Valeur"),
    #"Lignes filtrées1" = Table.SelectRows(#"Supprimer le tableau croisé dynamique des autres colonnes", each ( Text.Trim([Valeur])= "Need")),
    #"Lignes groupées" = Table.Group(#"Lignes filtrées1", {"LOCO", "Valeur"}, {{"Nombre", each Table.RowCount(_), Int64.Type}, {"Qui", each _[Player]}}),
    #"Valeurs extraites" = Table.TransformColumns(#"Lignes groupées", {"Qui", each Text.Combine(List.Transform(_, Text.From), "; "), type text}),
    #"Colonnes supprimées" = Table.RemoveColumns(#"Valeurs extraites",{"Valeur", "Nombre"})
in
    #"Colonnes supprimées"

st007 à dit:

dans le vrai fichier, les players sont indiqués "1 Prénom nom", "2 prenom nom", etc Comment dois-je modifier

Cliquez pour agrandir...

let
Source = Table.ColumnNames(Excel.CurrentWorkbook(){[Name="TableauDiesel"]}[Content]),
/* sélection par différence de deux listes */
ListDifference = List.Difference(Source,{"REC","LOCO", "TYPE", "PWR"}),
/* sélection par décalage (en sautant les 4 premiers)*/
#"ListRange tous joueurs" = List.Range(Source,4),
/* sélection de 34 par décalage (eb sautant les 4 premiers) */
#"ListRange 34 joueurs" = List.Range(Source,4,34),
/* sélection des noms préfixés pas un nombre */
#"ListSelectJoueurs indéxés" = List.Select(Source,each try Value.Is(Number.From(Text.Split(_," "){0}), type number) otherwise false)
in
#"ListSelectJoueurs indéxés"

Cliquez pour agrandir...

Fonctions de liste - PowerQuery M

En savoir plus sur les alertes suivantes : Fonctions de liste

learn.microsoft.com

Cliquez pour agrandir...