如何让EXCEL表格里的数字每打印一次都能自己加1

来源：百度知道 编辑：UC知道 时间：2024/06/06 16:29:08
单位有个表格里边有一组数字，比如20080001，现在想要这组数字在这个表格每次打印都能自动+1，例如20080002，20080003.。。。。！如果EXCEL不能做到别的软件也行，但要求里边除了这组数字外还能随意在任意位置加一些文字！不知道我说明白了没有！
三楼的你没明白我的问题，我不是要在表格上让这组数字+1，而是要在打印的时候让这组数字每打印一页都能自动+1.

Private Sub Worksheet_BeforePrint(Cancel As Boolean)
A1 = A1 + 1
End Sub

1：用EXCEL做的话只能用宏～但是这种功能要求我还没有尝试过，不知道可否～
2：用别的软件

补充：
Sub Macro1()
'
' Macro1 Macro
' 宏由 zhai 录制，时间: 2008-7-11
'

'
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Range("D6").Select
ActiveCell.FormulaR1C1 = "1"
Range("D6").Select
Selection.Copy
Range("B2:B11").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlAdd, SkipBlanks _
:=False, Transpose:=False
Range("D6").Select
Application.CutCopyMode = False
Selection.ClearContents
End Sub
这样可以～～你看看改改，每次打印就直接运行宏就可以，不用点打印。
这样同样是改了你的文件内容了～～所以，要是不改动内容，只能用别的专用的打印程序了

你说明白了，不过打印工作可以看作是：
1、启动打印请求
2、打印程序启动读取请求
3、数据读取
4、数据输出
5、数据打印
从这几个过程来看，excel属于被动接受响应方，所以不能实现你的