用EXCEL打印表格 自动加编码
我现在用EXCEL编好了一个表格,打印时想在其上面加入类似于单据上的连续编码,请各位帮忙,在线等请上面两位说的再明确一点。谢谢!...
我现在用EXCEL编好了一个表格,打印时想在其上面加入类似于单据上的连续编码,请各位帮忙,在线等
请上面两位说的再明确一点。谢谢! 展开
请上面两位说的再明确一点。谢谢! 展开
5个回答
展开全部
假设编码在G1单元格,使用下面代码可实现打印和自动编码递增。
按ALT+F11打开VBA窗口,插入一个模块,把下面代码复制进去。
回到excel窗口,按“视图-工具栏”,点“窗体”,调出“窗体”工具栏,在上面选一个按钮,添加到表格上,并指定宏为“打印”。
使用时,每点击一下添加的按钮,就会打印一次,并使编号自动加一。
Sub 打印()
ActiveWindow.SelectedSheets.PrintOut
s = Val(Range("g1"))
s = s + 1
Range("g1") = "'" & Right("0000" & s, 5)
End Sub
如有疑问,可以H我。
按ALT+F11打开VBA窗口,插入一个模块,把下面代码复制进去。
回到excel窗口,按“视图-工具栏”,点“窗体”,调出“窗体”工具栏,在上面选一个按钮,添加到表格上,并指定宏为“打印”。
使用时,每点击一下添加的按钮,就会打印一次,并使编号自动加一。
Sub 打印()
ActiveWindow.SelectedSheets.PrintOut
s = Val(Range("g1"))
s = s + 1
Range("g1") = "'" & Right("0000" & s, 5)
End Sub
如有疑问,可以H我。
展开全部
以我多年的经验好象不可以出现这样的结果,上面那位说的定义页眉或页脚也不能出现这自动变的结果,还是手动输入下吧
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
可以用宏实现,但是我水平太低爱莫能助
就是统计打印次数的功能,每打印一次,编码自动加1
就是统计打印次数的功能,每打印一次,编码自动加1
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
定义页眉或页脚,在页面设置里
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询