赋值语句5万行就报溢出正常吗？

abbr

代码如下：


Sub aaa()
   Dim i As Integer
   For i = 1 To 50000
       Cells(i, 1) = "1"
   Next i   
End Sub

一运行就报运行时错误‘6’
溢出

小fisher

Dim i As Long才行，Integer的取值范围是-32768~32767

tennicse

Dim i As long   试试？

ykcbf1100

如果不使用强制申明，那把Dim这句删除就可以了。

Yanxi2021

小fisher 发表于 2022-11-30 14:50
Dim i As Long才行，Integer的取值范围是-32768~32767

到现在为止我都不知道单精度能表示的范围

小fisher

Yanxi2021 发表于 2022-11-30 16:57
到现在为止我都不知道单精度能表示的范围

单精度浮点数占用4个字节，负值取值范围在-3.402823 * 10^38到-1.401298E * 10 ^-45之间，正值取值范围在1.401298 * 10^-45到3.402823*10^38之间。

Yanxi2021

小fisher 发表于 2022-12-1 09:09
单精度浮点数占用4个字节，负值取值范围在-3.402823 * 10^38到-1.401298E * 10 ^-45之间，正值取值范围在 ...

这个e，是自然底数2.71828吗？