excel表格票据编码怎么设置

1.求高手指教,EXCEL里怎么能打印单据编号?

Private Sub Workbook_BeforePrint(Cancel As Boolean) confirm = MsgBox（"自动更新单据编号？"， vbYesNoCancel） If confirm = 2 Then Cancel = True: Exit Sub If confirm = 6 Then With Sheets("Sheet2").Range("G5") .Value = Format(Date, "Wyyyymmdd") & Format(Val(Right(.Value, 5)) + 1, "00000") End With End If这段代码"Wyyyymmdd"怎么会显示成5yyyymmdd，只要是字母"W"就会显示为数字"5“。

2.excel设计的单据自动编号

当然大家也可以根据自己的实际情况来选择练习的内容。

在此为了讲解上的需要，特制作两列，第一列就“序号”，第二列是“名称”。怎样在excel中自动生成序号然后依次在“序号”的下面的单元格中输入"1”和"2".接着选中这两个单元格，将鼠标放到被选中的单元格的右下角，当鼠标变成"黑色十字"光标时，按时鼠标左键不放，同时拖动到内容的最后一行再释放鼠标.就会发现所有序号下面的单元格自动完成填充.怎样在excel中自动生成序号怎样在excel中自动生成序号在序号在"3"的行上右击，选择"插入"选项来插入新行， 接着选择“序号”行下面"1"和"2"这两个单元格，将鼠标放到被选中的单元格的右下角，当鼠标变成"黑色十字"光标时，按时鼠标左键不放，同时拖动到内容的最后一行再释放鼠标.就会发现所有序号下面的单元格自动完成序号的填充.怎样在excel中自动生成序号怎样在excel中自动生成序号怎样在excel中自动生成序号当然，如果记录行数较多时，这种生成序号的方式就显得麻烦，一种比较好的办法就是利用公式来实现.首先删除序号列下面的所有内容，并在序号列的下面第一个单元格中输入公式"=Row()-1".怎样在excel中自动生成序号将鼠标放到该单元格的右下角，当鼠标变成"黑色十字"光标时，按时鼠标左键不放，同时拖动到内容的最后一行再释放鼠标.就会发现所有序号下面的单元格自动完成填充.怎样在excel中自动生成序号怎样在excel中自动生成序号在序号为“3”所在的行上右击，从弹出的菜单中选择“删除”选项，在弹出的窗口中选择“整行”，就会发现所有序号自动生成并有序。

怎样在excel中自动生成序号怎样在excel中自动生成序号怎样在excel中自动生成序号在序号为“3”所在的行上右击，从弹出的菜单中选择“插入”选项，在弹出的窗口中选择“整行”。怎样在excel中自动生成序号怎样在excel中自动生成序号怎样在excel中自动生成序号最后将序号为“3”的单元格公式复制到下面，就会发现所有序号列单元格又有序排列啦。

怎样在excel中自动生成序号。

3.在Excel中自动生成单据编号问题

测试没有问题的Private Sub Workbook_BeforePrint(Cancel As Boolean)Set a = Sheets（"当前"）.[I2]confirm = MsgBox（"自动更新单据编号？"， vbYesNoCancel）If confirm = 2 Then Cancel = True: Exit SubIf confirm = 6 Thena.Value = "NO:A2019" & WorksheetFunction.Text(Right(a.Value, 5) + 1, "00000")End IfEnd Sub。