看看这个excel程序

来源:百度知道 编辑:UC知道 时间:2024/06/22 22:43:38
我想让a1——a100分别赋值1——1000,步长是10下面这个程序是我自己想的。不过出来以后每个单元格里都是991,各位大侠,我是新手能不能指点下错在哪里了?
For m = 1 To 100
For i = 1 To 1000 Step 10
Range("a" & m) = i
Next i
Next m
能不能告诉我问什么我的这个程序出来时每个单元格都是991...
我是想用FOR语句在单元格里输入个等差数列。。。步长不一定是10 。如果是其他的话。一楼的代码就不行了吧。
在补充下。。老师要求首项是1

只要是等差数列一楼的代码都可以满足要求
for i = 1 to 100
cells(i, 1) = (i-1) * 步长+1
next i

for i = 1 to 100
cells(i, 1) = i * 10
next i

直接输入10、20、30,选中后,往下拖,就会出现40、50、.....990、1000.

from写错了