Hi,
What is for you ... a paragraph ???
Are you working with Excel ... or with Word ...???
[SIZE=1]let
CharsToReplace = List.Transform({33..64,91..96,123..126}, each Character.FromNumber(_)),
Source = Excel.CurrentWorkbook(){[Name="Table7"]}[Content],
#"Split Column by Delimiter" = Table.ExpandListColumn(Table.TransformColumns(Source, {{"sentence", Splitter.SplitTextByDelimiter(" ", QuoteStyle.Csv), let itemType = (type nullable text) meta [Serialized.Text = true] in type {itemType}}}), "sentence"),
#"Added Custom" = Table.AddColumn(#"Split Column by Delimiter", "TT", each Text.Trim([sentence],CharsToReplace)),
#"Filtered Rows" = Table.SelectRows(#"Added Custom", each ([TT] <> ""))
in
#"Filtered Rows"[/SIZE]
[SIZE=1]let
Source = Excel.CurrentWorkbook(){[Name="Table8"]}[Content],
#"Split Column by Delimiter" = Table.ExpandListColumn(Table.TransformColumns(Source, {{"words", Splitter.SplitTextByDelimiter(" ", QuoteStyle.Csv), let itemType = (type nullable text) meta [Serialized.Text = true] in type {itemType}}}), "words")
in
#"Split Column by Delimiter"[/SIZE]
[SIZE=1]let
Source = Table.NestedJoin(Table8,{"words"},Table7,{"TT"},"Table7",JoinKind.LeftOuter),
#"Expanded Table7" = Table.ExpandTableColumn(Source, "Table7", {"TT"}, {"TT"}),
#"Filtered Rows" = Table.SelectRows(#"Expanded Table7", each ([TT] <> null)),
#"Calculated Count" = List.NonNullCount(#"Filtered Rows"[TT]),
#"Converted to Table" = #table(1, {{#"Calculated Count"}})
in
#"Converted to Table"[/SIZE]
sure but PowerQuery is required
for source table
Code:[SIZE=1]let CharsToReplace = List.Transform({33..64,91..96,123..126}, each Character.FromNumber(_)), Source = Excel.CurrentWorkbook(){[Name="Table7"]}[Content], #"Split Column by Delimiter" = Table.ExpandListColumn(Table.TransformColumns(Source, {{"sentence", Splitter.SplitTextByDelimiter(" ", QuoteStyle.Csv), let itemType = (type nullable text) meta [Serialized.Text = true] in type {itemType}}}), "sentence"), #"Added Custom" = Table.AddColumn(#"Split Column by Delimiter", "TT", each Text.Trim([sentence],CharsToReplace)), #"Filtered Rows" = Table.SelectRows(#"Added Custom", each ([TT] <> "")) in #"Filtered Rows"[/SIZE]
for words list table
Code:[SIZE=1]let Source = Excel.CurrentWorkbook(){[Name="Table8"]}[Content], #"Split Column by Delimiter" = Table.ExpandListColumn(Table.TransformColumns(Source, {{"words", Splitter.SplitTextByDelimiter(" ", QuoteStyle.Csv), let itemType = (type nullable text) meta [Serialized.Text = true] in type {itemType}}}), "words") in #"Split Column by Delimiter"[/SIZE]
for result table
Code:[SIZE=1]let Source = Table.NestedJoin(Table8,{"words"},Table7,{"TT"},"Table7",JoinKind.LeftOuter), #"Expanded Table7" = Table.ExpandTableColumn(Source, "Table7", {"TT"}, {"TT"}), #"Filtered Rows" = Table.SelectRows(#"Expanded Table7", each ([TT] <> null)), #"Calculated Count" = List.NonNullCount(#"Filtered Rows"[TT]), #"Converted to Table" = #table(1, {{#"Calculated Count"}}) in #"Converted to Table"[/SIZE]