两种办法。1,工作簿有个打印事件,可以把递增编号的代码放在下面过程中,打印的编号是增加后的编号:PrivateSubWorkbook_BeforePrint(CancelAsBoolean)Range("E2")=Range("E2")+1EndSub2、另写一段宏代替菜单或工具栏中的打印命令,这样可以打印前或打印后改变编号: