生成多个卡片式表格

 

举例

有员工信息表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文件中