Question

excel vba中单元格range("a" & i) = 1我想让i是几个数，譬如说1，2，3，5，8该怎么表示i呢

RT
平时都用c++
VB用的少
谢谢

Answer 1

Sub kjlkjkl()
arr = [{1,2,3,5,8}]
For Each i In arr
    Range("a" & i) = 1
Next
End Sub

Answer 2

定义一个数组，如arr用来存放（1，2，3，5，8），如
arr=array(1,2,3,5,8)
range("a" & i) = 1改为：
For i = 0 To 4
range("a" & arr(i))=1
Next

Answer 3

for i =1 to 5