高人，想请问一下在EXCEL中打印时怎么设置编码会自动增加？

2024-12-31 00:17:52

推荐回答（3个）

回答1：

可以用下面代码实现

Sub 打印()

s = Range("B1") '编号在B1单元格，有7位字符

ActiveWindow.SelectedSheets.PrintOut '调用打印命令打印当前页

Range("B1") = Right("0000000" & s + 1, 7) '打印完毕后让序号加一

End Sub

效果见附件

回答2：

使用这款现成的，勾选仅递增打印。

回答3：

例：=right("00000000"&b3,8)，结果就是00000029，其它的就将公式下拉。