excel如何在一个单元格中自动编号？比如:NO:00000001.打印下一次单时变成NO:00000002.

Question

如题所述

Answer 1

假设这个需自动编号的单元格在sheet1中的A1单元格，先右键点击A1单元格，依次点"设置单元格格式"→"自定义"，在类型下面的输入框，输入00000000,这个编号需要多为位就输入多少个0，然后点击确定。
然后按alt+f11打开VBA编辑器，双击窗口左边工程窗口中的ThisWorkbook,在弹出的代码编辑区粘贴如下代码：
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheet1.Range("A1") = Sheet1.Range("A1") + 1
End Sub
保存后关闭VBA编辑器。
在第一次打印之前将A1单元格的数值改为0.
OK
说明：由于这个代码不能区分打印预览和打印，需要在写代码之前预览好设置好打印格式，以后使用不能再预览，否则，如果再预览后再打印的话，编号会在一次打印时加2。

Answer 2

如图，对A1,设置单元格格式"№"00000000

插入一个矩形（其它也行），输入文字（自己定，本人输入“增号”)

在矩形上右击，指定宏，输入宏名如kk,"新建”。

将下列代码加入即可。

Sub kk()
[a1] = [a1] + 1
End Sub

这样点矩形即增加数字。其实为了防止误操作，还可参照做一个减号。

供您参考。祝您一切顺利

Answer 3

第一行输入初始编号，鼠标点击第一个单元格，变为黑粗十字后，下拉到需要的单元格，选择序列填充，（07是自动的，不用选择序列。）