5.5 纵向拆分 - 一行生成一张卡片
有员工信息表 Employee.xlsx 部分数据如下图所示:
想要用这些数据为每位员工生成一个如下格式的卡片式表格,空的卡片文件名为 Card.xlsx:
生成的卡片文件用员工的姓名命名,如:
Andrew.Fuller.xlsx:
Janet.Leverling.xlsx:
Margaret.Peacock.xlsx:
Nancy.Davolio.xlsx:
等等…
编写脚本:
A | B | C | |
---|---|---|---|
1 | =T(“Employee.xlsx”) | [B1,B2,D2,D1,B3,B4,B5,B7,B6] | |
2 | for A1 | =file(“Card.xlsx”).xlsopen() | |
3 | for C1 | =B2.xlscell(B3,1;A2.field(#B3)) | |
4 | =file(A2.FirstName+“.”+A2.LastName+“.xlsx”).xlswrite(B2) |
A1 读入员工信息表数据
C1 定义员工信息各列要写入卡片中的单元格名称序列
A2 循环每位员工
B2 打开空卡片文件为 Excel 对象
B3 循环每个要填写的单元格
C3 向当前要写的单元格填入当前员工 A2 中对应列号的内容
B4 将 B2 的 Excel 对象保存到以员工姓名命名的 Excel 文件中
帮你早下班 - esProc 桌面版与 Excel 数据处理
5.4 纵向拆分 - 按数据分段 (按过滤条件)
5.6 纵向拆分 - 多卡片拆成一张卡片一个文件