excel如何大量自动编号

以在区域A1:A20000填充1,2,....,20000为例,兼谈及1,3,5,....：

(在excel 2000中测试)
方法一：
(1)在单元格A1输入1
(2)ctrl_G,输入A20000,回车;
(2-)ctrl_shift_向上方向键
(3)alt_EIS-回车
注释:
(2)比在名称框输入快一些
(2-)选中区域A20000:A1，比输入A20000:A1略快
(3)菜单"编辑-填充-序列"-回车，应用默认设置（序列产生在：列；类型：等差；步长：1)
如果步长设置为2,则是填充1,3,....

方法二：
（1）在A1输入法，A2输入 =A1+1
(2）ctrl_G，输入A20000:A2,回车,ctrl_D
注：（1）公式=A1+步长，如果是=A1+2,则填充1,3,....
(2)注意是A20000:A2；ctrl_D，则是将A2的公式填充到区域中去，公式会相对自动变化。

在A1单元格输入1,执行编辑-填充-序列,选择序列产生在:列,类型为:等差数列,步长为:1,终止值为:10000或为你要的数,确定就行了

用宏。代码如下：
Private Sub CommandButton2_Click()
Dim i
i = 2
Do Until i = 10001
Cells(i, 1) = Cells(i - 1, 1) + 1
i = i + 1
Loop
End Sub
在A1单元格输入1，运行代码。