How To Print Multiple Copies With Sequence Page Numbers in two cells?

[Collector1982]

I am trying to get this code below to work so I can print multiple copies of a form with the same sequence number in two different cells:

Sub PrintCopiesWithNumbers()
'UpdatebyEntendoffice20161031
Dim i As Integer
Application.ScreenUpdating = False
For i = 1 To 10
Range("A2").Value = "'Kjøretøy " & i
ActiveSheet.PrintOut
Next i
Application.ScreenUpdating = True
MsgBox "Totally print" & (i - 1) & "copies", vbInformation, "Kutools for Excel"
End Sub

It works now with the sequence in Cell A2 but I would also like to have the same text and sequence in cell A12. How can I manage that.

Thanks

Tor Inge