只有三个格子的内容不同的excel表格，要打几百张，怎么做能快一点啊

Question

要制作专利文件的封皮，每个封皮的表格上只有专利名称、专利号和时间不同，需要打将近一千张，模版是固定的，不能改格子的位置。我在一个文件里已经做了几百张空白表，目前想的是往固定位置填充内容就行，这些位置呈等差数列。我应该怎么弄啊，求大牛指导。
需要导入的数据在另一张表格里

Answer 1

要在同一个文件里面弄，你先打印预览把边界搞好，复制你的空白模板在外面相邻的单元格粘贴，需要改动的位置写成前面一个模板中对应位置+1的形式，再复制第二个模板，按住Ctrl+方向键选中区域，直接粘贴即可。然后再确认一下打印预览有无异常，排除即可。

我以前也做过相类似的工作，不过没有你的那么多。这样应该是可以的。只是有时候页面的分类会出问题，要先把第一个模板调整好。

Answer 2

事实只要一张空白表的模板就能自动生成所有的。

可以直接用公式，不过那还得复制数百个公式，最好是通过VBA来完成。

假设 sheet1表要导入的数据 A列专利名称，B列专利号，C列时间，从第2行开始。
sheet2是空白表，每张表占5行：表头、专利名称、专利号、时间、表尾各占一行。

可以将如下VBA复制到 sheet2的代码区执行，具体的位置你根据需要调整，：

sub abc()
for i=1 to 10 '假设10张空表，这个数据可以调整，先测试一下。
sheet2.cells(5*i-3,1)=sheet1.cells(i+1,1)
sheet2.cells(5*i-2,1)=sheet1.cells(i+1,2)
sheet2.cells(5*i-1,1)=sheet1.cells(i+1,3)
next i
end sub本回答被提问者和网友采纳

Answer 3

用WORD的邮件合并功能：
1、在WORD中使用邮件合并，数据源选择你的“专利名称、专利号和时间”数据表；
2、页面设置，从EXCEL中复制你的空白模板，粘贴到WORD中，适当调整，使之与EXCEL中的一样；
3、在需要插入数据的地方设置数据。

Answer 4

可以把封面放在excel的某一页里面，然后用VBA把那三个改变的内容相应的填上去，还可以设置它自动打印的速率。追问

我理解你是什么意思，但是听上去好难啊，这个方法用什么关键词能搜到，vba的哪方面 ，我查查。

追答

如楼上所言！你可以在for的循环中设置打印。Application.ActiveSheet.PrintOut copies:=1
楼上的只是个例子，你要根据实际情况修改代码。你应具备VBA基础。

Answer 5

word里面有邮件合并
建议你试试去追问

你是说把表格复制到word里么 我试试