Gemaakt door Berre 6AP
Importeer via Gegevens ophalen > Web:
https://extra.verre-kijker.be/trending_BE_7d_20260317-1137.csv
https://extra.verre-kijker.be/trending_DE_7d_20260317-1134.csv
https://extra.verre-kijker.be/trending_FR_7d_20260317-1134.csv
https://extra.verre-kijker.be/trending_NL_7d_20260317-1132.csv
We maken één mastertabel van de 4 bronnen:
Gegevens transformeren > Query's toevoegen als nieuw
(Kies "Drie of meer tabellen")
Vervang alles door deze code:
let
Bron = Table.Combine({#"trending_NL_7d_20260317-1132", #"trending_BE_7d_20260317-1137", #"trending_DE_7d_20260317-1134", #"trending_FR_7d_20260317-1134"}),
#"Geëxtraheerde tekst achter scheidingsteken" = Table.TransformColumns(Bron, {{"Column6", each Text.AfterDelimiter(_, "=", {0, RelativePosition.FromEnd}), type text}}),
#"Headers met verhoogd niveau" = Table.PromoteHeaders(#"Geëxtraheerde tekst achter scheidingsteken", [PromoteAllScalars=true]),
#"Kolommen verwijderd" = Table.RemoveColumns(#"Headers met verhoogd niveau",{"Uitsplitsing van trend"}),
#"Waarde vervangen" = Table.ReplaceValue(#"Kolommen verwijderd"," om "," ",Replacer.ReplaceText,{"Gestart", "Geëindigd"}),
#"Geëxtraheerde tekst vóór scheidingsteken" = Table.TransformColumns(#"Waarde vervangen", {{"Gestart", each Text.BeforeDelimiter(_, " UTC"), type text}}),
#"Geëxtraheerde tekst vóór scheidingsteken1" = Table.TransformColumns(#"Geëxtraheerde tekst vóór scheidingsteken", {{"Geëindigd", each Text.BeforeDelimiter(_, " UTC"), type text}}),
#"Type gewijzigd" = Table.TransformColumnTypes(#"Geëxtraheerde tekst vóór scheidingsteken1",{{"Gestart", type datetime}, {"Geëindigd", type datetime}}),
#"Waarde vervangen1" = Table.ReplaceValue(#"Type gewijzigd","K+","000",Replacer.ReplaceText,{"Zoekvolume"}),
#"Waarde vervangen2" = Table.ReplaceValue(#"Waarde vervangen1","+","",Replacer.ReplaceText,{"Zoekvolume"}),
#"Tekst opgeschoond" = Table.TransformColumns(#"Waarde vervangen2",{{"Zoekvolume", Text.Clean, type text}}),
#"Afgekapte tekst" = Table.TransformColumns(#"Tekst opgeschoond",{{"Zoekvolume", Text.Trim, type text}}),
#"Kolom splitsen op scheidingsteken" = Table.SplitColumn(#"Afgekapte tekst", "Zoekvolume", Splitter.SplitTextByDelimiter("#(00A0)", QuoteStyle.Csv), {"Zoekvolume.1", "Zoekvolume.2"}),
#"Type gewijzigd1" = Table.TransformColumnTypes(#"Kolom splitsen op scheidingsteken",{{"Trends", type text}, {"Zoekvolume.1", Int64.Type}, {"Zoekvolume.2", type text}}),
#"Aangepaste kolom toegevoegd" = Table.AddColumn(#"Type gewijzigd1", "Aangepast", each if [Zoekvolume.2] <> null then [Zoekvolume.1]*1000000 else [Zoekvolume.1]),
#"Volgorde van kolommen gewijzigd" = Table.ReorderColumns(#"Aangepaste kolom toegevoegd",{"Trends", "Zoekvolume.1", "Zoekvolume.2", "Aangepast", "Gestart", "Geëindigd", "Link verkennen"}),
#"Kolommen verwijderd1" = Table.RemoveColumns(#"Volgorde van kolommen gewijzigd",{"Zoekvolume.2", "Zoekvolume.1"}),
#"Namen van kolommen gewijzigd" = Table.RenameColumns(#"Kolommen verwijderd1",{{"Aangepast", "Zoekvolume"}}),
#"Type gewijzigd2" = Table.TransformColumnTypes(#"Namen van kolommen gewijzigd",{{"Zoekvolume", type number}}),
#"Fouten verwijderd" = Table.RemoveRowsWithErrors(#"Type gewijzigd2", {"Gestart"}),
#"Namen van kolommen gewijzigd1" = Table.RenameColumns(#"Fouten verwijderd",{{"Link verkennen", "Land"}}),
#"Type gewijzigd3" = Table.TransformColumnTypes(#"Namen van kolommen gewijzigd1",{{"Gestart", type date}})
in
#"Type gewijzigd3"
Datumtabel =
VAR StartDatum = DATE(2026, 1, 1)
VAR EindDatum = DATE(2026, 12, 31)
RETURN
ADDCOLUMNS (
CALENDAR (StartDatum, EindDatum),
"Jaar", YEAR([Date]),
"MaandNaam", FORMAT([Date], "MMMM"),
"DagNaam", FORMAT([Date], "dddd"),
"DagInWeek", WEEKDAY([Date], 2)
)
Ga naar de relatie-weergave:
Steek Date (uit de Datumtabel) in Gestart (van je hoofddata).