How to call Macro specific Number of times

[Legacy 185509]

Hi
I am trying to run a loop like 16 times
is there any way I can do it please help me
thank you so much

 

[VoG]

What do you have in R1? It has to be a number. Not a number stored as text, text or an error value.

 

[Legacy 185509]

oh oky it was calculated value but I tried with like real number 2
it still doesn't work

 

[Legacy 185509]

it works if I do this

Sub Run()
For i = 1 To Sheets("Sheet1").Range("R1").Value
    Call Second_Run
Next i
End Sub

but it does extra run

 

[VoG]

What value (exactly) is in R1?

 

[Legacy 185509]

R1 = 2 <-- without any formula,

and after adding Sheets("Sheet1").Range("R1").Value
it still works if I have
R1 = 1+1 = 2
or
R1 = E5/7 = some number



---
I think it is doing initial run 1 once always thats why
and it is calling second run how ever many times in this case 2 so = 3

 

[VoG]

Try

Sub MyRun()
For i = 1 To CLng(Sheets("Sheet1").Range("R1").Value)
    Call Second_Run
Next i
End Sub

Run is a reserved word.