excel中vba编程实现a1=1 a2=2 a3=3····一直到a10=10怎么实现 用循环语句 球解释

2025-02-26 11:01:21
推荐回答(3个)
回答1:

Sub test()
Dim i As Integer '声明i是整数变量
For i = 1 To 10 '循环1到10
Cells(i, 1) = i '赋值
Next
End Sub

回答2:

dim a(1 to 10) as long
dim i as long

for i = 1 to 10
a(i)=i
next

回答3:

For I = 1 To 10
Cells(I, 1) = I
Next I