let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Split" = Table.ExpandListColumn(Table.TransformColumns(Source, {{"ColumnToExpand", Splitter.SplitTextByDelimiter("DelimiterSymbol", QuoteStyle.Csv), let itemType = (type nullable text) meta [Serialized.Text = true] in type {itemType}}}), "ColumnToExpand")
in
    #"Split"