EXCEL打印时自动生成流水单号

这个通过代码来实现不太现实,因为打印可以通过菜单、快捷按钮、快捷键、宏代码等来进行,要对这么多东西进行监测很困难,只有监测系统的打印服务进程才能实现,但是也可能存在打印失败,通信失败等等变化。
但是可以设置你的流水单号来达到你的要求:我们知道时间是不会重复的,而且是从小到大的,就用时间序列作为你的流水单号即可。
每当你重新生成一张流水单,即可使用按钮或宏快捷键生成流水单号。
比如发货单:FHD(科目)CK01(01仓库)20100516(日期序列)080852(08:08:52)时间序列
新建一个按钮或宏,A1单元格自动写入流水单号
Sub MACRO1()
M = CLng(Date)
N = CLng(Hour(Now))
O = CLng(Minute(Now))
P = CLng(Second(Now))
Cells(1, 1) = "FHDCK01_" & M & N & O & P
End Sub
设置一下宏的快捷键即可使用了
Private Sub CommandButton1_Click() '这个是使用按钮的
M = CLng(Date)
N = CLng(Hour(Now))
O = CLng(Minute(Now))
P = CLng(Second(Now))
Cells(1, 1) = "FHDCK01_" & M & N & O & P
End Sub
添加一个按钮控件即可