need to print a sequence of numbers on excel 2013

I have an Excel sheet and i resized the print area to print on A5 size
now i have 2 cell fits in the "A5" paper and each one have a number

what i need is to print numbers from (0001 to 5000) with one click (each A5 paper should have two number)

for example
paper 1 have: 0001 and 0002
paper 2 have: 0003 and 0004
paper 3 have: 0005 and 0006
etc..

my sheet is attached.

can anyone help for the same ?

1) Put this formula into C2:

=A2+1

2) Install this macro into this workbook in a standard code module:

Option Explicit

Sub PrintLogoNumbers()
Dim First As Long, Last As Long, NUM As Long

First = Application.InputBox("Enter the starting number:", "First Number", 1, Type:=1)
If First = 0 Then Exit Sub
Last = Application.InputBox("How many numbers are needed:", "Total Numbers", 5000, Type:=1)
If Last = 0 Then Exit Sub

With ThisWorkbook.Sheets("Snum")
    For NUM = First To First + Last - 1 Step 2
        .Range("A2").Value = NUM
        .PrintOut Copies:=1
    Next NUM
End With

End Sub