关于数据整理

零度的微笑

商品订单转换

转换前

原来样子

希望变成这样

飞天篮球猪

可以试试Power Query, M 语句如下：

1. let
   
2.     源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
   
3. 
   
4.     变 = Table.CombineColumns( 源,
   
5.                                List.Skip(Table.ColumnNames(源),10),
   
6.                                each #table({"商品","数量"},List.Split(List.RemoveNulls(_),2)),
   
7.                                "a" ),
   
8. 
   
9.     果 = Table.ExpandTableColumn(变, "a", {"商品", "数量"})
   
10. in
    
11.     果

复制代码

一并附上文件：
1.xlsx.zip (18.54 KB, 下载次数: 13)

2019-1-12 13:23 上传

点击文件名下载附件

车田小民

数据透视也可以，分别透视A、B、C出产品

零度的微笑

飞天篮球猪 发表于 2019-1-12 13:23
可以试试Power Query, M 语句如下：
一并附上文件：

感谢 大神的帮忙   

零度的微笑

车田小民 发表于 2019-1-12 14:00
数据透视也可以，分别透视A、B、C出产品

谢谢您的回复  

zhouxiao

飞天篮球猪 发表于 2019-1-12 13:23
可以试试Power Query, M 语句如下：
一并附上文件：

Excel 2013里面有没有List.Split,用的是2016吧?

飞天篮球猪

zhouxiao 发表于 2019-1-17 11:46
Excel 2013里面有没有List.Split,用的是2016吧?

下载最新的插件，或者更新2016和office365
List.Split和Table.Split用了大半年了。

zhouxiao

飞天篮球猪 发表于 2019-1-17 11:49
下载最新的插件，或者更新2016和office365
List.Split和Table.Split用了大半年了。

我把2013里的Power Query插件更新到PowerQuery_2.56.5023.1181,还是没有List.Split,估计是要升级到2016了

飞天篮球猪

zhouxiao 发表于 2019-1-17 13:32
我把2013里的Power Query插件更新到PowerQuery_2.56.5023.1181,还是没有List.Split,估计是要升级到2016了

List.Split 目前没发现特别好用的套路。就是个split的功能。
List.Split({1..10},1)可以用List.Zip({{1..10}})表示
List.Split({1..10},n) 可以用
= let L={1..10} in List.Transform({0..Number.RoundUp(List.Count(L)/n)-1},each List.Range(L,_*n,n)) 表示
就是语句长了一点。

zhouxiao

飞天篮球猪 发表于 2019-1-17 13:56
List.Split 目前没发现特别好用的套路。就是个split的功能。
List.Split({1..10},1)可以用List.Zip({{1. ...

曾经遇到过相似的例子,我最后是用VBA解决的.
一直想看下Power Query的解决方案,今天看到你的代码,很想学习
朋友,可以写一个不用List.Split,得到最终结果的代码看一下嘛?谢谢