如下图的选择题,将单行选择拆分为多行。选择题问题和每个答案选项分开,并且每道题之间插入一个空行。
结果如下图:
我的M代码:
let
源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
data=Table.AddColumn(源,"结果",each Text.Split(List.Accumulate({"A".."Z"},[原数据],(x,y)=>Text.Replace(x,y&".", "#(lf)"&y&".")),"#(lf)")&{null})[结果],
res= Table.ExpandListColumn(Table.FromList(data,Splitter.SplitByNothing(),{"结果"}), "结果")
in
res