UC知道一个关于excel自动编号的问题，各位老大请指教！
来源：百度知道 编辑：UC知道 时间：2024/07/02 15:26:51
<<<<< 入 库 单 NO: 0800109
对方科目: 日期：2007-12-22
序号 产品名称 单位 数量 单价 金额合计（元）>>>>>
就是这个入库单的 NO：后面的数字，我想让它每保存一次就自动增加一号。
目的是防止下次再打开这个模板的时候，避免重复编号！
可能要涉及到宏，我不会用，请各位高手来帮我做个模板，小弟感激不尽！
对不起，我只有10分了，感激之情不是用分来形容的阿，对吧？
对方科目: 日期：2007-12-22
序号 产品名称 单位 数量 单价 金额合计（元）>>>>>
就是这个入库单的 NO：后面的数字，我想让它每保存一次就自动增加一号。
目的是防止下次再打开这个模板的时候，避免重复编号！
可能要涉及到宏，我不会用，请各位高手来帮我做个模板，小弟感激不尽！
对不起，我只有10分了，感激之情不是用分来形容的阿，对吧？
假设你的编号输入在SHEET1的A1
首先将A1定义一下格式.
格式-单元格-数字-分类-自定义,在"类型"中输入
"NO:"0000000
然后按下ALT+F11,双击右边的"THISWORKBOOK",复制下面代码.退出.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("sheet1").Cells(1, 1) = Sheets("sheet1").Cells(1, 1) + 1
End Sub
楼上的真是高手，学习了，看了一下此动作发生在每次存盘之前，如果能明白如何控制是在存盘前执行还是在每次打开后就执行就好了。