stack space deficiency

[tom taol]

i want to do using recursive method. but error.

Sub f_recursive_ex(k As Long)
If k = 10000 Then Exit Sub
ActiveCell.Value = k
k = k + 1
Call f_recursive_ex(k)
End Sub

Sub recursi()

Call f_recursive_ex(1)
End Sub

 

[Juan Pablo González]

Is there a point to try to use recursion in there instead of a For/Next or a
Do/Loop ?