Gary"s Student...Loved the play on words with ride sally ride...It does get
me the numbers I listed but I want to be able to enter a different date, a
different increment, a certain location to record the data, and a different
end date each time I run the macro. Will a Message box as from my previous
post be the best method?

"Gary''s Student" wrote:

This is just as easy to do without a macro, but:

Sub ride_sally_ride()
v1 = Range("A1").Value
v2 = Range("A2").Value
j = 6
For i = 3 To 35 Step 2
Cells(i, 1).Value = v1 + j
Cells(i + 1, 1).Value = v2 + j
j = j + 6
Next
End Sub

will replicate you sample data
--
Gary''s Student - gsnu200719