excel是否可以自动更改表格里面的序号，从而连续打印？

Question

比如说，要给产品贴标签，产品的信息都一样，只有编号不一样，这个编号就是简单的1、2、3、4,。。。。。那么怎样在打印机打印时，不用每次去手动更改编号，就能打印出这样的 标签呢？

Answer 1

sub 打印()
for i=起始号 to 结束号
sheets("工作表标签名").range("输入序号的单元格地址")=i
sheets("工作表标签名").printout
next
end sub追问

非常感谢！！已经可以打印了，自动的。只是这样打印机打的速度有点慢啊，可以完善吗？

追答

在一张工作上制作N个标签，只要按一次“打印”就可以了。如果标签的格式不复杂的话，做N个标签也并不难。