图1是打开表格时候的样子，图2是打印预览，每一页只有人名和编号不一样，这是别人发给我的模板，可是尺寸是B5的，想重新做一个这样的A4尺寸的，可是怎么样才能做出这个模板呢？求详细步骤。
1、首先，我们打开一个excel文档来演示，如图所示，该文档有7个表格组成，我需要把它们批量打印。
2、然后，我们点击菜单栏“WPS表格”，在下拉菜单中选择“打印”，“打印”，调出打印面板。
3、在面板中，我们先选择打印机（选择本机连接的打印机），然后把打印内容设置为“整个工作簿”，点击确定。
4、此时，我们就看到打印机开始工作，并打印整个工作簿，我们只需等待打印全部完成即可。
创建一个Word文件，制作证书模板
按证书的尺寸，设置页面大小。本例中，证书大小为23.9*16.7厘米。
接着，设置页面为横向。
最后,按证书格式输入内容。
启动邮件合并向导
点菜单“邮件，在面板中选择“开始邮件合并”按钮，在下拉菜单中，选择“邮箱合并分步向导…”
进行“邮件合并”把Excel中的数据合并到Word文档中
邮件合并操作步骤：
在奖状文档页面进行下述操作即可。
执行“工具/信函与邮件/邮件合并”命令，打开“邮件合并”对话框（在窗口右侧）。
1.选中“信函”单击“下一步”；
2.选中“使用当前文档”单击“下一步”；
3.选中“使用现有列表”单击“浏览”，找到数据表后单击“打开”，单击“下一步”；
4.将光标定位于要合并数据的位置，单击“其他项目”，把“插入合并域”中的项目选定（如姓名）后单击“插入/关闭”；
5.重复第5步，完成所有合并域的插入（如类别、等级）后，单击“下一步”；
6.单击“预览信函”中的按钮即可浏览合并效果，再单击“下一步：完成合并”就可以进行打印；
7.打印可以全部打印也可以指定打印，根据实际情况在“合并到打印机”进行设置。
注意事项：
如果设计的是胸卡、工资条之类的小页面，邮件合并完成后，执行“编辑/查找”命令，在“查找”栏输入^p，“替换”中输入^l，单击“全部替换”按钮，删除分页符。这样就可以在一张纸上顺序打印出指定量的“胸卡、工资条等”文档了。
用VBA来实现，在工作表添加一个Button和两个TextBox（用来填写打印范围），设计好打印样式，固定打印区域。
对每个数据进行编号，在打印界面用VLOOKUP函数对编号进行链接。
最后就是给Button添加VBA代码：
Private Sub CommandButton1_Click()
MsgBox "确定打印？", vbInformation
Dim B& 'B为每行数据的编号
Dim sht As Worksheet
Set sht = ActiveSheet
'当前工作表名
SF = ActiveSheet.Name
For B = TextBox1.Value To TextBox2.Value '打印范围
Sheet1.Cells(1, 3) = B 'Cells(1,3)为自定义
sht.Activate '刷新当前工作表
ActiveSheet.PrintOut From:=1, To:=1
Next
MsgBox "打印完成！", vbInformation
End Sub
excel批量打印的方法为：
打开excel文件；
选中要打印的工作表（如：sheet1、sheet2...sheet30）；
设置好打印参数，直接打印即可。
使用邮件合并功能可完成
可参考
或发送邮件到137133842@qq.com本回答被提问者采纳
