This is my first go at Power Query
Please let me know what can be done better
let
Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
#"Changed Type" = Table.TransformColumnTypes(Source,{{"Column1", type text}}),
#"Uppercased Text" = Table.TransformColumns(#"Changed Type",{{"Column1", Text.Upper, type text}}),
#"Split Column by Position" = Table.SplitColumn(#"Uppercased Text", "Column1", Splitter.SplitTextByPositions({0, 4}, false), {"Column1.1", "Column1.2"}),
#"Changed Type1" = Table.TransformColumnTypes(#"Split Column by Position",{{"Column1.1", type text}, {"Column1.2", type text}}),
#"Split Column by Position1" = Table.SplitColumn(#"Changed Type1", "Column1.2", Splitter.SplitTextByPositions({0, 4}, true), {"Column1.2.1", "Column1.2.2"}),
#"Merged Columns" = Table.CombineColumns(#"Split Column by Position1",{"Column1.1", "Column1.2.1", "Column1.2.2"},Combiner.CombineTextByDelimiter("-", QuoteStyle.None),"Merged")
in
#"Merged Columns"