Question

Excel中VBA 代码需要循环运行，但是我不确实需要循环多少次，我想把单元格J1里的数值赋值给循环次数，

Excel中VBA 代码需要循环运行，但是我不确实需要循环多少次，我想把单元格J1里的数值赋值给循环次数，在线等

Answer 1

for……next循环如下

Sub 循环1()

Dim i%

For i = 1 To [j1].Value

要执行的代码

Next

End Sub

do……loop循环如下

Sub 循环2()

Dim i%

Do

要执行的代码

i = i + 1

Loop Until i = [j1].Value

End Sub