当前位置:首页 » 自动清洗 » 怎样使表格自动生成单号
扩展阅读
金山文档怎样设置日期 2024-11-15 10:21:27
在家怎样快速开肩 2024-11-15 10:12:54
信用贷可以贷多少 2024-11-15 10:07:54

怎样使表格自动生成单号

发布时间: 2022-01-29 12:57:19

㈠ EXCEL表格里怎么能让单号自动生成

这有多种方法,不知道你的模板样式,如果是列表格式,可用ROW()函数来设置,如果是单据格式的单号,用辅助列来提取原最大单号,再加1来解决

㈡ 表格中怎么自动生成打印单号

用宏解决。在Excel中,同时按Alt和F11进入宏界面,在左上窗口找到本工作簿的名字,里面有个ThisWorkbook,双击它,在右边窗口粘贴如下代码:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Range("F1") = Range("F1") + 1 '请自己把F1改为你实际存放单号的单元格
End Sub
回到Excel。这可以实现,只要存盘,单元格F1就在原来的数字上加1。

如果你一天要存盘几次,而打印只有一次,建议将代码改为:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Range("F1") = Range("F1") + 1
End Sub
这个可以实现:你一点打印,F1自动加1,然后打印。(因此,你原来的单号要小1号)。

按你所需了。如果你一天又打印几次又存盘几次,比较麻烦。

㈢ excel单号自动生成

要使用VBA程序,写入以下代码:
PrivateSubWorkbook_BeforePrint(CancelAsBoolean)

DimxAsInteger

x=Val(Right(Sheet1.Cells(1,1),Len(Sheet1.Cells(1,1))-3))

Sheet1.Cells(1,1)="NO:"&WorksheetFunction.Text(x+1,"000000")

EndSub

其中000000个数根据需要设置。

㈣ Excel表格怎么生成自己单号

下载升级版的,带数据库的

㈤ EXCEL表格里怎么能让单号自动生成

excel里,可以利用时间函数today和row函数自动生成单号。

假如A列是单号,可以在A2输入公式:=IF(B2<>"",TEXT(TODAY(),"yyyymmdd")&ROW()-1,"")。公式解析:如果B2单元格为空,就显示为空,否则就返回日期函数和row函数生成的序列号。用today函数生成的序列号,带有日期的信息,可以在以后方便的查找。

㈥ excel表格中订单号自动生成

假设你在SHEET1的A1中显示订单编号
按下ALT+F11,双击左边的"THISWORKBOOK",复制下列代码退出.
另:在打印预览时,编号才会更新.

Private Sub Workbook_beforePrint(Cancel As Boolean)
Sheets("Sheet1").Cells(1, 1).Select
a = Selection.Value
If a = "" Or Left(a, 8) <> Format(Date, "yyyymmdd") Then
Selection.Value = Format(Date, "yyyymmdd") & Format(1, "00")
Else
Selection.Value = Val(a) + 1
End If
End Sub

㈦ 请问如何在excel表格中设置 送货单单号能自动连续的生成流水号,而且每天日期可以自动更新谢谢!

=TEXT(TODAY(),"000000") &text(row(),"0000")
前部分表示日期,后部分表示流水号,row()后面可以加减一个数字,确定你的起始编号。

㈧ Excel 表格里如何自动生成单号,打印之后自动递增

您好,1、通过《收款单》,来逐步看一下设置表格打印后编码自动加1。
2、同时按下Alt+F11键,弹出如图对话框。
3、依次点击菜单栏,“插入-模块”。
4、在模块对话框中输入:Sub PR()

ActiveSheet.Printout

[D2]=[D2]+1

End Sub
其中【D2】为编码单元格,输入完毕后,关闭VB对话框。
5、在对话框中,依次选取【自定义】-【开发工具选项卡】-【宏安全性】,将【宏安全性】添加到右栏,点击【确定】。
6、会发现工具栏中出现了【宏安全性】图标。
7、双击【宏安全性】图标,弹出【信息中心】对话框,在其中点击【宏设置】,选取“启用所有宏”,点击确定。
8、同时按下Alt+F8二键,弹出【宏】对话框。
9、在【宏】对话框中,点击【选项】,弹出【宏选项】界面,在此界面中可以设置热键,设置成“CTRL+P”,点击【确定】,设置完毕。
10、按下“CTRL+P”,打印的同时,编码自动变化+1。

㈨ 怎样excel自动生成单号

在a1输入NO.KG00001,按alt+f11,双击左上窗口的thisworkbook,复制以下代码粘贴,关闭窗口回到表格,下次打开表格就自动出单号。如果不想在a1生单号,可以改在其他单元格,稍微改下代码就行。

Private Sub Workbook_Open()
Dim a
a = Mid(Cells(1, 1), 6, 5)
a = a + 1
If a < 10 Then
Cells(1.1) = "NO.KG" & "0000" & a
ElseIf a < 100 Then
Cells(1.1) = "NO.KG" & "000" & a
ElseIf a < 1000 Then
Cells(1.1) = "NO.KG" & "00" & a
ElseIf a < 10000 Then
Cells(1.1) = "NO.KG" & "0" & a
ElseIf a < 100000 Then
Cells(1.1) = "NO.KG" & a
End If
End Sub