excel,打印过后编号加1

2025-03-06 12:08:46
推荐回答(2个)
回答1:

Sub 按钮1_Click()
   ActiveSheet.Print
   [a1] = Left([a1], 3) & (Right([a1], 6) + 1)
End Sub

插入一个打印按钮

指定以上宏。

a1 为编号所在位置

点击按钮打印,编号加1

回答2:

要用到workbook_beforePrint事件吧?详细请参考:
打印后编号自动增加一位
http://www.exceltip.net/thread-11831-1-1-2667.html