excel打印送货单设置自动生成流水号

要在Excel打印送货单流水号，每印一次往下流水一个号码，要怎么弄？

Sub 打印()
If MsgBox("确定要打印 发货单？", vbYesNo, "提示") = vbYes Then
Range("A1:I20").Select'打印区域，自己修改
Selection.PrintOut Copies:=1 '
'----------------------假设 需要增加的单号在 I2 单元格
x = Len([i2])
arr = Right([i2], x - 3)
[i2] = ""
[i2] = "N0." & arr + 1
MsgBox "打印完毕"
End If
End Sub

是连续的
流水号
吗，选中其中两个，往下拖动选中右键下的小点，就是
填充柄

亲，这个需要VBA编程解决。假设你的要打印的这个表的工作表名称为“Sheet1”，流水号在F2单元格。

下面的代码可以实现先递增流水号再打印。注意，当你要打印第一个编号时，请先把编号设为NO.201500000。

 

打开你的Excel文件，按“Alt+F11”打开VBA编辑窗口，然后在左侧对应的Thisworkbook上双击，右侧空白处粘贴下面的代码。关闭VBA窗口。

 

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "Sheet1" Then
    Application.EnableEvents = False
    [f2] = Left([f2], 7) & Format(Right([f2], 5) + 1, "00000")
    ActiveSheet.PrintOut
    Application.EnableEvents = True
End If
End Sub

可以使用这款现成的，勾选递增打印。

还可以自动清空表格，用VBA编程实现。

按ALT+F11 ,
PrivateSub Workbook_BeforePrint(Cancel As Boolean)
n = Val(Replace([M1], "本文档已经累计打印", ""))
[M1] = "NO.201500000" & n +1
End Sub

要在Excel打印送货单流水号,每印一次往下流水一个号码,要怎么弄...
答：回答：Sub 打印() If MsgBox("确定要打印 发货单?", vbYesNo, "提示") = vbYes Then Range("A1:I20").Select'打印区域,自己修改 Selection.PrintOut Copies:=1 ' '----------------------假设 需要增加的单号在 I2 单元格 x = Len([i2]) arr = Right([i2], x - 3) ...

求助:将Excel送货单里的数据自动生成明细汇总,
答：VBA可以处理，需要上面文件附到163箱mijizili 或参考下面 Excel怎样根据日期变化汇总各表数据

Excel怎样让送货单自动生成对账单
答：第二步：创建一个入出库管理表，有入库、出库、在库三张表格。第三步：建立一个送货单生产的宏。每次送货时，利用上记订单管理表输入本次发货数量。完成今后，启用该宏，自动生成送货单。送货单的大致数据项有：送货日期，订单编号，订单内序号，产品名称，产品代码，订单数量，本次送货数量。第四步：...

excel表格送货单号怎么设置打印一份自动递增编号加1?
答：直到鼠标变成加号的形式；5. 点击鼠标左键并拖动鼠标，向下拖动多行，使得编号公式被复制到下面的行中；6. 点击“文件”菜单，选择“打印”，在页面设置中选择打印“所有的工作表”。在打印预览中，会发现每个订单的编号已经自动递增加1。这样就实现了在每次打印 excel 表格时自动递增编号加1的效果。

请问我用EXCEL做个送货单的表格..那个单号我想要打一次后就自动加一个...
答：EXCEL存档不好看吧。有专业的送货单软件，新峰送货单助理可以现实这个功能。新峰送货单助理(新峰送货单软件) 适用于小型企业或个人及个体户用于送货单管理.本软件集送货单,产品名称/产品单价/规格管理,月结管理,数据分析,图表分析于一身.具用自动记忆功能,你开过的送货单不需要重复录入,你送过货的客户不...

EXCEL能否自动生成单号?送货单自动生成+1单号
答：当然可以，方法有很多，但要看你在什么情况下生成了。有通过函数生成的，也有通过VBA生成的。

请教大神Exce表格怎么自动生成送货单?
答：sheet1 sheet2 A1=LOOKUP(MOD(ROW(),4),{0,1,2,3},{"赠送数量：";"2016年送货单";"客户名称：";"赠送品种："})B1=INDEX(Sheet1!$A$2:$C$26,INT(ROW(A4)/4),MOD(ROW(A4),4))两公式向下复制。筛选出A列为2016年送货单"的行。选中A1:B1合并居中，把这个合并单元格向下复制，...

怎样使excel自动生成递增单号怎样使excel自动生成递增单号格式
答：7. 如果要继续递增单号，请重复第二步到第六步的操作即可。8. 最后，保存该文件并关闭。注意：如果要生成连续的数字，不要在单元格中输入非数字字符(例如字母、符号等)。如果需要添加前缀或后缀，请在公式中添加。在Excel表格中,选择需要设置自动递增编号的单元格,例如A1单元格。2.输入第一个送货单...

送货单怎么打印?
答：在Excel中做送货单的步骤如下：第一步：打开Excel 第二步：选中第一行的前9列，点击合并并居中，如下图 第三步：在这行输入送货单，字体调成成你想要的大小 第四步：在第二行的第1列和第7列写上生产线：和NO:第五步：选中3-10行的前8列，选择如下图的划红线的田字框，效果如下图 第六...

excel怎样让送货单自动生成对账单
答：应收（应付）对账单可以在WORD中，做成一个表格，就是不变的地方。其它变动的地方可以做成EXCEL表。在WORD中使用邮件合并功能，就能将EXCEL表的数据取过来。EXCEL表中可设置自动取数的，用数据有效性完成。也可设置未完成的以特别的颜色显示。