将 excel 中一行拆分到多行
例题描述和简单分析
有Excel文件Book1.xlsx，部分数据如下所示：
| A | B | C | D | … | W | X | |
| 1 | 名称 | 数量 | 重量1 | 重量2 | … | 重量21 | 重量22 |
| 2 | 甲 | 21 | 26.3 | 22 | … | 27.7 | |
| 3 | 乙 | 22 | 29.6 | 28.9 | … | 28.9 | 35.8 |
| 4 | 丙 | 15 | 30.9 | 26.4 | … | ||
| 5 | 丁 | 15 | 28.8 | 23.8 | … | ||
需要按每行10个重量拆分到多行，部分结果如下所示：
| A | B | C | D | E | … | |
| 1 | 名称 | 数量 | 重量1 | 重量2 | 重量3 | … |
| 2 | 甲 | 10 | 26.3 | 22 | 25 | … |
| 3 | 甲 | 10 | 29.4 | 28.8 | 30.9 | … |
| 4 | 甲 | 1 | 27.7 | … | ||
| 5 | 乙 | 10 | 29.6 | 28.9 | 29.4 | … |
| 6 | 乙 | 10 | 29.1 | 28.9 | 28.8 | … |
| … | … | … | … | … | … | … |
解法及简要说明
在集算器中编写脚本p1.dfx，如下所示：
| A | |
| 1 | =file("Book1.xlsx").xlsimport@w(;,2).(~.select(~)) |
| 2 | =A1.news(~.m(3:).group((#-1)\10);A1.~(1)|~.len()|~).(#1) |
| 3 | ["名称","数量",…,"重量10"] |
| 4 | =file("result.xlsx").xlsexport@w([A3]|A2) |
简要说明：
A1 Excel从第二行开始读成序列的序列，过滤空值
A2 第三列开始的数据每10列分一组，在每列前并上“名称”和“数量”
A3 表头的串序列
A4 表头（A3）并数据（A2），导出至result.xlsx
https://club.excelhome.net/thread-1594162-1-2.html
