Question

在EXCEL里,如何每打印一次单据,单据右上角的单号自动增加1

即单号：CK20586 ，打印一次后，末位变成7 ，8 。9

Answer 1

在 thisworkbook里 加入改变单号的代码
假设单号在A1格
则
Private Sub Workbook_BeforePrint(Cancel As Boolean)
[a1] = Left([a1], 2) & (Right([a1], 5) + 1)
End Sub

Answer 2

插入一个控件--打印按钮，在执行打印的同时，将编号加一。