1、在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】!

2、会进入VBA编辑界面!点击菜单栏【插入】,在其下拉菜单中,选择【模块】!

3、会弹出模块编辑窗口!

4、在模块编辑窗口输入以下代码:Sub 自动编码()Range("e2").NumberFormat = "@"[e2] = Format(Now(), "ymdhms")End Sub

5、在EXCEL表格中的【开发工具】菜单下,点击【插入】按钮,插入一表单,并命名为【自动编码】!

6、点击【自动编码】,编号会根据当前时间自动编码!
