Changing the page number in Excel each time I print

Question

I want to add an additional input box for range printing.

I changed the code from this post to include another input box to determine the number range and to printpreview instead of printing if possible.

So the code asks:

• How many copies do you want? (e.g. 10)
• What number do you want to start at? (e.g 50)

Now Excel prints 10 copies numbered 50 -60

Sub PrintCopies_ActiveSheet()

    Dim CopiesCount As Long 
    Dim CopyNumber As Long 
    Dim StartNumber As Integer 

    CopiesCount = Application.InputBox("How many copies?", Type:=1)
    StartNumber = Application.InputBox("Number to start from", Type:=1) 

    For CopyNumber = StartNumber To CopiesCount 
        With ActiveSheet
            .Range("C1") .Value = CopyNumber 
            .PrintPreview
        End With 
    Next CopyNumber 

End Sub 

My question is, how to change the number in Excel each time I print (and for a range)