如何在Excel表格里设置流水号？

对不起，我一点都不懂VAB打印时能自动生成流水号

2024年11月19日 05:49

有3个网友回答

网友（1）：

可试下列公式:=TEXT(TODAY(),EEMMDD)&-&TEXT(RAND()*1000,0000)若要依列递增=TEXT(TODAY(),EEMMDD)&-&TEXT(ROW()*1000,0000)然后下拉或若要依栏递增=TEXT(TODAY(),EEMMDD)&-&TEXT(COLUMN()*1000,0000)然后右拉

网友（2）：

按 alt+F11,
在工作簿插入这段VBA
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheet1.Cells(1,2) = Sheet1.Cells(1,2) + 1
End Sub
这里假设B1是送货单号的位置.

网友（3）：

提示：
当天日期可通过today函数得到
随机号码通过rand随机函数取得，若要得到a~b之间的随机数，可用(b-a)*rand()+a求得，若要取整，再用函数int得到，合起来就是int((b-a)*rand()+a)，如果随机号码固定为五位，则用text函数得到。
综上所述，最终公式设定为：
=today()&text(int((b-a)*rand()+a),"00000")
实际应用中，输入正确的a和b，以及0的个数，就可得到正确的结果，需要更新时按F9键。