如何把大 Excel 文件拆成多个小文件

出于各种原因，有时我们要将一个大Excel拆成一些小文件。这种算法可以用VBA实现，但代码很非常难写，还容易发生内存溢出。

用esProc就简单多了，比如把大文件拆成每1500行一个的小文件，只有这么几行：

	A	B	D
1	=file("dt.xlsx").xlsimport@t()		/打开Excel，假定第一行是标题
2	for A1.group((#-1)\1500)		/循环取数，每次1500行
3		=file(#A2/".xlsx").xlsexport(A2)	/生成小Excel，文件名为循环数

有时还可能按列分组来拆分，比如Excel首行标题为col1、col2…，且已按col1排序（可以事先在Excel中排好），我们要根据col1拆分成多个Excel。代码也很简单：

	A	B	D
1	=file("dt.xlsx").xlsimport@t()
2	for A1.group(col1)		/按col1分组循环
3		=file(A2.col1/".xlsx").xlsexport@t(A2)	/小文件名为分组名

把前面两个要求合并起来也很简单（即按col1分组，但子文件最多1500行）：

	A	B	C	D
1	=file("dt.xlsx").xlsimport@t()
2	for A1.group(col1)			/按col1分组循环
3		for A2.group((#-1)\1500)		/再每次循环取1500条
4			=file(B3.col1/#B3/".xlsx").xlsexport@t(B3)	/小文件名为分组名+循环次数

esProc是个脚本语言，可以在桌面IDE里执行，数据以表格呈现，调试这种带循环的算法很方便。

类似的Excel计算的例子（含超出内存的大Excel）：

SPL 解析及导出 Excel SPL 解析及导出 Excel
excel 合并汇总 excel 合并汇总

文本文件和 Excel 在 esProc 里处理方式相同，很多算法可以互相参考：
SPL 结构化文本计算 SPL 结构化文本计算