生成多个卡片式表格

 

举例

有员工信息表employee.xlsx部分数据如下图所示:

..

想要用这些数据为每位员工生成一个如下图所示的卡片式表格,空的卡片文件名为card.xlsx

..

编写SPL脚本:


A B C
1 =T("E:/work/employee.xlsx") [C1,C2,F2,C3,C4,D5,C7,C8]
2 for   A1 =file("E:/work/card.xlsx").xlsopen()
3
for   C1 =B2.xlscell(B3,1;A2.field(#B3))
4
=file("E:/work/"+A2.Name+".xlsx").xlswrite(B2)

A1   读入员工信息表数据

C1   定义员工信息各字段要写入卡片中的单元格名称序列

A2   循环每位员工

B2   打开空卡片文件为Excel对象

B3   循环每个要填写的单元格

C3   向当前要写的单元格填入当前员工A2中对应字段号的内容

B4   B2Excel对象保存到以员工姓名命名的Excel文件中