Same VBA in worksheet but different results EG: cell P1 8592701, cell P43 4451

[Maureen Preece]

Hi - MY VBA is a print with consecutive numbers on each sheet printed, cell P1, but also in cell P43 I need to put in consecutive numbers, that are different then P1, then allow to print based on the numbers count in P1, the sheet is to be printed on the same A4 paper each side, hope this makes sense, new to this stuff.

Sub PrintJobs()
Dim i As Long, startnum As Long, lastnum As Long

startnum = Application.InputBox("Enter the first job number to be printed", "Print Job Number", 1, , , , , 1)
lastnum = Application.InputBox("Enter the last job number to be printed", "Print Job Number", 1, , , , , 1)

For i = startnum To lastnum
Range("P1").Value = i
ActiveWindow.SelectedSheets.PrintOut
Next

End Sub