Split of a Field Values

Anonymous 

here is the code and also the pbix file.

let
Source = Table.FromRows(Json.Document(Binary.Decompress(Binary.FromText("i45WMjDU9UrMU9JRCvM1BJKhxUWGOgpA0ghMmirF6gDVGMHVGEHUmKCLG0PEjXWAhJlSbCwA", BinaryEncoding.Base64), Compression.Deflate)), let _t = ((type nullable text) meta [Serialized.Text = true]) in type table [Date = _t, MachineName = _t, AssociatedUsers = _t]),
#"Changed Type" = Table.TransformColumnTypes(Source,{{"Date", type date}, {"MachineName", type text}, {"AssociatedUsers", type text}}),
#"Split Column by Delimiter" = Table.SplitColumn(#"Changed Type", "AssociatedUsers", Splitter.SplitTextByDelimiter(",", QuoteStyle.Csv), {"AssociatedUsers.1", "AssociatedUsers.2", "AssociatedUsers.3"}),
#"Changed Type1" = Table.TransformColumnTypes(#"Split Column by Delimiter",{{"AssociatedUsers.1", type text}, {"AssociatedUsers.2", type text}, {"AssociatedUsers.3", type text}}),
#"Unpivoted Only Selected Columns" = Table.Unpivot(#"Changed Type1", {"AssociatedUsers.1", "AssociatedUsers.2", "AssociatedUsers.3"}, "Attribute", "Value"),
#"Removed Columns" = Table.RemoveColumns(#"Unpivoted Only Selected Columns",{"Attribute"})
in
#"Removed Columns"