苏good第三季全集:在excel中打印的时候可以自动生成单据编号吗10在excel中打印的时候可以自动生成单据编号吗

来源：百度文库 编辑：偶看新闻 时间：2024/05/03 05:03:43
  • 在excel中打印的时候可以自动生成单据编号吗10在excel中打印的时候可以自动生成单据编号吗
    如：                                            就是打印一次单号就自动加1这样子的
    问题补充：
      就是比如：20100731，打印一次之后，下一次打印的时候就自动变成20100801，前面那六位数是按当天的日期显示，后两位数是编号，可以实现吗？

  • 好像是可以。

      要怎样设置呢

  • 我可以帮你实现在打印前增加。不过你的例子说的不明白，是从20100731变成20100801（即年月日）这样的呢，还是7月份20100701、20100702、...20100756、20100757、....到了8月份20100801、20100802、...20100835、20100836、（即年月加序号）
    无论如何，操作如下：
    同时按Alt和F11进入宏界面，在左上窗口找到本工作簿里的ThisWorkbook，双击它，在右边窗口粘贴如下代码：
    Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Range("F1") = Format(CDate(Format(Range("F1"), "0000-00-00")) + 1, "YYYYMMDD")
    End Sub
    这是第一种情况，假设单号在单元格F1，不是的话自己修改。另一种情况把中间那句话改为：
    If Left(Range("F1"), 6) = Format(Date, "YYYYMM") Then
    Range("F1") = Range("F1") + 1
    Else
    Range("F1") = Format(Date, "YYYYMM") * 100 + 1
    End If

      我对这个一点也不懂，粘贴代码之后呢，要按那里

      这是事件代码。Workbook_BeforePrint翻译过来就是“打印工作表之前”先做这些事情。
    那你回到Excel里，点打印，它就自动增加数字了。（Excel会先增加再执行打印）


  • 就像你设制拒绝接收群消息一样，如果你设置的话就能了！
  • 你要变化的这个格子
    设置函数=today()
    然后设置格式为自定义 yyyymmdd
  • 要自己设置的把

      应该可以吧  你试一下

      我知道可以，就是不知道怎么设置才问你们大家的啊

      对了 ，你可以建立以下序列了，输入编号的

如何在Excel中，打印时每页自动生成标题栏 在excel的单元格中如何自动生成流水号？ 在EXCEL中如何实现通过输入身份证号码，就可以自动生成出生年月 在Excel中如何生成自动合计数 在 Microsoft excel 中可不可以自动生成随机数据？ 怎样在Excel的单元格中输入自动生成的页码? EXCEL中用VBA编程，如何在打印成PDF文件的时候自动给文件命名？ excel中如何自动生成符合条件的内容？ Microsoft Excel的中自动生成计数方法有哪几种呢？ Excel的中自动生成计数方法有哪几种呢？ 如何在EXCEL表格中打印时自动添加表头 如何在Word和Excel中实现自动双面打印 在Excel中如何让打印出来的每份报表数据都自动求和 一个在EXCEL中打印的问题？ 打印单据的软件 excel中打印的时候怎样设置才能在页面上出现页码？？？？ 在excel中，如何在一个工作表里面添加数据后，另一个工作表自动生成添加的数据 为什么我在生成excel报表的时候 excel中打印的时候怎么插入页数 如何在EXCEL中往下拉，自动生成一列01、02、03、04……的序列号？ 怎样引用把EXCEL中的一行数据自动分成多行打印在EXCEL，WORD中 在EXCEL文档编辑中，怎样让文字自动排版？在打印区域内段落自动转行？ Excel表格怎么在打印的时候显示 谁知道如何在Word或Excel中实现自动生成系数结果