It is not clear what you are trying to do, but what you describe is a basic loop process e.g. Run the sub Example to call the other sub three times. If you want more information you will have to supply more detail.
Code:
Sub Example()
DoSomething 3
End Sub
Sub DoSomething(x As Long)
Dim y As Long
For y = 1 To x
'do stuff e.g.
MsgBox y
Next y
End Sub