Looping through Values

[Yao567]

Hi so basically i need to loop through the values xo=-7 and xf = 5
For a graph there need to be 21 grid pts ie 21 values between -7 and 5 and i calculate dx to be .6ish

Basically I just need help putting this into a loop using variables for the numbers so i can change the xo's and xf's etc.

xo = InputBox("What is xo")
xf = InputBox("What is xf")
GridPts = InputBox("What is the number of GridPts")



Range("A1") = "xo"
ActiveCell.Offset(0, 1) = "xf"
ActiveCell.Offset(0, 2) = "GridPts"
ActiveCell.Offset(0, 3) = "dx"
ActiveCell.Offset(1, 0) = xo
ActiveCell.Offset(1, 1) = xf
ActiveCell.Offset(1, 2) = GridPts
ActiveCell.Offset(1, 3) = Dx(xo, xf, GridPts)
A = Dx(xo, xf, GridPts)

Range("B6") = "xo"
For i = xo To xf
Cells(i + 5, 1) = i
Next i
End Sub

This is what i got but doesnt work

 

[ravi4ever]

if xo's value is -7 then you should add 8 first to nullify its effect..

For i = -7 To 5
    Cells(i + 8, 1) = i
Next i