moving text box in a sheet according to a loop variable

hello,

I need to creat multiple textboxes in a loop and to place them one under another. I am trying to use Selection.ShapeRange.IncrementTop 60+I when I is the loop variable. but it is not working, any help?


Thank you!