EXCEL中如何用日期函数设置单据编号

问题描述

精选答案

步骤1：单击“开发工具”>>>插入>>>ActiveX控件>>>命令按钮，然后在工作表要放置按钮的地方，按住鼠标左键，划出一个矩形，就插入了一个命令按钮控件。

步骤2：右击命令按钮>>>属性步骤3：把Caption属性改为要显示的字符，如“编号增加”，再关闭“属性”对话框。步骤4：右击控件>>>查看代码，Excel会自动打开VBA编辑器，输入代码后关闭VBA编辑器。Private Sub CommandButton1_Click()Dim numIf Len([F2]) = 0 Thennum = 1ElseIf Format(Date, "yyyymmdd") = Left([F2], 8) Thennum = Right([F2], 2) + 1Elsenum = 1End Ifnum = Format(Date, "yyyymmdd") & Format(num, "00")[F2] = numEnd Sub步骤5：单击“设计模式”以退出设计模式，再单击“编辑增加”按钮，就会自动编辑增加。