怎样将excel一列 自动填充为1到50000，一直拉下去太慢

比方说你要在A列输入1到50000的数字,你在A1中输入1,然后选中A列,然后在菜单栏上点编辑-----填充------序列-----等差序列------步长值那里填1,终止值那里填50000,确定.不知道你要的是不是这样的效果

在宏代码框中输入下列代码,运行.

Sub aaaa()
Dim a As Integer
Dim b As Integer
a = InputBox("请输入起始数")
b = InputBox("请输入终值数")
Range("A1").Select
For X = a To b
ActiveCell.Value = a
ActiveCell.Offset(1, 0).Select
a = a + 1
Next
End Sub

只是随便弄个不同的方法,就成公敌了.算了.那就严重支持一楼的吧.

晕，犯得着用VBA吗，杀鸡用牛刀啊。
选中A3,冻结窗口，a1和a2中输入1,2,将光标定位至A50000,选中A1和A2,向下拖至50000.

。。。。
VBA都用上了。。。。
VBA是好，可是也不能乱用啊

一楼已正解,别用什么VBA了,会用VBA就不会问这个。