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

单位有个表格里边有一组数字,比如20080001,现在想要这组数字在这个表格每次打印都能自动+1,例如20080002,20080003.。。。。!如果EXCEL不能做到... 单位有个表格里边有一组数字,比如20080001,现在想要这组数字在这个表格每次打印都能自动+1,例如20080002,20080003.。。。。!如果EXCEL不能做到别的软件也行,但要求里边除了这组数字外还能随意在任意位置加一些文字!不知道我说明白了没有!
三楼的你没明白我的问题,我不是要在表格上让这组数字+1,而是要在打印的时候让这组数字每打印一页都能自动+1.
展开
 我来答
独驾舟千里去
2008-07-11 · TA获得超过1380个赞
知道小有建树答主
回答量:1208
采纳率:0%
帮助的人:1051万
展开全部
你说明白了,不过打印工作可以看作是:
1、启动打印请求
2、打印程序启动读取请求
3、数据读取
4、数据输出
5、数据打印
从这几个过程来看,excel属于被动接受响应方,所以不能实现你的需求,你要做的这个事情需要在第三个步骤中想办法,只能是专门做一个软件,但是这样很麻烦,而且太专项性了,你只要换一个excel就不能用了,建议你还是手工改一下,或者从别的方式看看,例如存一个可以打印的放在特殊的地方,访问一次就记录一次,存一个不可以打印的pdf之类的文件放在公共阅读区
aaron8421
2008-07-11 · TA获得超过7537个赞
知道大有可为答主
回答量:2815
采纳率:0%
帮助的人:689万
展开全部
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
这样可以~~你看看改改,每次打印就直接运行宏就可以,不用点打印。
这样同样是改了你的文件内容了~~所以,要是不改动内容,只能用别的专用的打印程序了
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
yjsqy117
2008-07-11 · 超过12用户采纳过TA的回答
知道答主
回答量:67
采纳率:0%
帮助的人:35.7万
展开全部
我是这样理解你的问题的。假如我想打从1到20.我会先打1,下一格打2,在下一格打3,我会打到5左右,然后把他们全涂黑,在黑界得右下角晃动,对好了就会出现一个黑色得加号,按住后一直拖动就顺着出现了。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
tlxwd
2015-05-29 · TA获得超过1148个赞
知道大有可为答主
回答量:1592
采纳率:66%
帮助的人:709万
展开全部
Private Sub Worksheet_BeforePrint(Cancel As Boolean)
A1 = A1 + 1
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式