Excel通过宏创建百万数据

打开视图->宏->编辑，代码如下，cells（n，m）表示当前Excel表格第n行第m列</span>

Sub newdata()
Dim i As Long
For i =  To
Cells(i, ) = "numbe_r" & i
Next i
End Sub

注：Excel表格有行数限制，Excel2003：65536行；Excel2007/2010:1048576行。