如何将多个卡片构成的xls拆分成单独文件
自动拆分 Excel 很常见,简单的行式表格容易做,用 Python 等语言也不难实现,但有格式的卡片式表格就比较困难了,拆分后还要保留表格格式。
例题说明:现在需要将 Excel 中的若干卡片分别拆分到不同的 Excel 中,并以形如:001-fxs001 张三.xlsx 命名。
实现步骤:
1. 首先准备一个结果表格模板用来保证格式,表格内容为空,如下所示:
接下来分别读取原表每部分的数据依次填充到“模板”中,再分别保存成 Excel 文件就可以了。
2. 编写集算器脚本(可以到润乾官网下载,用职场版,首次运行时需要加载授权,同时下载一个免费的授权就行)
把里面的脚本列出来看下:
A |
B |
C |
D |
|
1 |
D:/Excel 表格拆分 / |
|||
2 |
=file(A1+"总表(原始数据表).xlsx").xlsopen() |
[A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z,AA] |
18 |
|
3 |
for |
if len(A2.xlscell("A"/(C2*(A3-1)+1)))==0 |
break |
|
4 |
=file(A1/"结果模板.xlsx").xlsopen() |
|||
5 |
for B2 |
for C2 |
=A2.xlscell(B5/(C5+C2*(A3-1))) |
|
6 |
=B4.xlscell(B5/C5;D5) |
|||
7 |
=C2*(A3-1)+3 |
|||
8 |
=A2.xlscell("X"/B7) |
=A2.xlscell("M"/B7) |
=A2.xlscell("C"/(B7+1)) |
|
9 |
=file(A1/B8/"-"/C8/D8/".xlsx").xlswrite(B4) |
采用循环卡片数量、固定行(18 行)和固定列(A 到 AA 列)读取每个原始 Excel 格值(D5 表达式)并将其写入模板对应格中(D6 表达式),需要注意的是写入模板的行始终是从 1 到 18 行。
B7 到 D8 取固定格值用于命名,如果不需要特殊命名则脚本更为简短。
按 F9 执行脚本可以看到目录下生成了 4 个文件:
其中“001-fxs001 张三.xlsx”的内容:
“003-fxs003 王五.xlsx”的内容:
搞定!