I have a macro that works great as is but I am trying to add a Message box that will ask for the number of rows to be added between each row of data. the way it is right now it will add 17 rows between each row of data. Can someone please help?
VBA Code:
Sub RunMe()
Dim x As Integer
x = 2
Do
Rows(x).Resize(16).Insert
x = x + 17
Loop Until IsEmpty(Cells(x, "A"))
End Sub