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)完成!
-
参考文献在文中怎么标注(word)
(尾注添加方法)在文章中标注参考文献,还在一个一个慢慢敲吗?看看用word怎么快速实现吧。这里以word2003为例。操作方法(01)光标移到要加入参考文献标注的地方(02)菜单中“插入”——“引用”——“脚注和尾注”(03)如图设置(04)确定后在该处就插入了一个上标“1”,而光标...
-
富士施乐硒鼓清零方法
如何将富士施乐硒鼓清零呢?跟着小编一起来学习看看~操作方法(01)当你的打印机上开始闪烁黄灯时,就是提醒你需要更换硒鼓了;(02)按住机器上的白色按钮,长按关机;(03)关机后,拔掉机身后的USB连接线;(04)再次长按白色按钮开机键,不要松手,打开机器前盖;(05)取出硒鼓盒;(06)整个取出后,再...
-
塞尔达传说 支线消失的咕咕鸡 任务攻略
很多小伙伴可能不了解塞尔达咕咕鸡任务,非常好奇想要知道,那么我就来解答一下这个问题吧,具体内容请看下文:塞尔达咕咕鸡任务一共7只鸡分布在村庄里,但是在地图上并没有任何的提示,寻找起来颇费一番功夫。操作方法(01)在地图上找到卡卡利科村,点进去;(02)跟丢鸡的老爷爷对...
-
邮箱快速注册,不用手机号
如何快速注册邮箱?如何不用手机号注册邮箱?仅以TOM邮箱为例。操作方法(01)点击连接进入TOM邮箱注册页面输入邮箱账号等信息(02)选择微信注册,拿出手机扫一扫即可完成注册特别提示使用微信扫一扫,不用手机号和验证码...