Excel BI Power Query Challenged 30 – Brian Julius Solution

gistfile1.txt

let
    Source = ScorersRaw,
    SplitByCharTrans = Table.SplitColumn(Source, "Highest Goal Scorer", Splitter.SplitTextByCharacterTransition({"0".."9"}, (c) => not List.Contains({"0".."9"}, c)), {"Highest Goal Scorer.1", "Highest Goal Scorer.2", "Highest Goal Scorer.3"}),
    SplitByDelim = Table.SplitColumn(SplitByCharTrans, "Highest Goal Scorer.2", Splitter.SplitTextByDelimiter("(", QuoteStyle.Csv), {"Highest Goal Scorer.2.1", "Highest Goal Scorer.2.2"}),
    SplitByCharTrans2 = Table.SplitColumn(SplitByDelim, "Highest Goal Scorer.2.1", Splitter.SplitTextByCharacterTransition({"a".."z"}, {"A".."Z"}), {"Highest Goal Scorer.2.1.1", "Highest Goal Scorer.2.1.2"}),
    RemoveDiacritics = Table.AddColumn(SplitByCharTrans2, "NoDiacritic", each  Text.FromBinary( Text.ToBinary( [Highest Goal Scorer.2.1.2], 1251), TextEncoding.Ascii)),
    RemoveCols = Table.RemoveColumns(RemoveDiacritics,{"Highest Goal Scorer.2.1.2", "Highest Goal Scorer.3"}),
    Reorder = Table.ReorderColumns(RemoveCols,{"Highest Goal Scorer.1", "Highest Goal Scorer.2.1.1", "NoDiacritic", "Highest Goal Scorer.2.2"}),
    Merge = Table.CombineColumns(Reorder,{"Highest Goal Scorer.1", "Highest Goal Scorer.2.1.1", "NoDiacritic", "Highest Goal Scorer.2.2"},Combiner.CombineTextByDelimiter("-", QuoteStyle.None),"Highest Goal Scorer")
in
    Merge