excel表格中日期+数字形式流水号制作方法

我们在商品销售等日常记账时常常使用日期+数字来作流水号。
比如我们在记录零售产品时，每一单都需要一个特别的号码来作为识别，也就是流水号了，如:
20170301-1              2017年3月1日第一笔
20170301-2              2017年3月1日第一笔
……
若每次均需要手动输入，就容易出错且带来更大的工作量，我们可以设置一些简单的公式来实现。

方法/步骤1：公式法

（01）先设计好你的表格表头

（02）在B2单元格输入公式：=IF(A2="","",TEXT(A2,"yyyymmdd")&"-1")在B3单元格输入公式：=IF(A3="","",TEXT(A3,"yyyymmdd")&"-"&RIGHT(B2,1)+1)

（03）选中B3单元格，点右下角黑色方块往下拖动填充公式到其他下行，比如填充到第10行B10

（04）此时，当你在A列输入日期时，B列就会自动合并成流水号，且流水号每次均呈递增状态，若需要更多的行，则再次拖动B列填充公式即可注意：B2单元格的函数公式只适用于B2使用，B列B3以下的单元格均参照B3函数公式往下填充

方法/步骤2：代码法

（01）设置好表格如图：

（02）Alt+F11打开Visual basic 编辑器输入代码：---------------------Private Sub Worksheet_Change(ByVal Target As Range)y = Range("A65536")(xlUp) + 1If Range("B2")e = "" ThenRange("B2")ulaR1C1 = "=IF(RC[-1]="""","""",TEXT(RC[-1],""yyyymmdd"")&""-1"")"ElseRange("B" & y)ulaR1C1 = "=IF(RC[-1]="""","""",TEXT(RC[-1],""yyyymmdd"")&""-""&RIGHT(R[-1]C,1)+1)"End IfEnd Sub------------------

（03）关闭Visual Basic，回到表格此时，当你在A列输入日期时，B列就会自动合并成流水号，且流水号每次均呈递增状态

（04）完成！