Hallo Jango
wenn Du dich mit VBA auskennst kannst Du dir folgendes Makro Anpassen
25. [VBA] Blatt mehrmals drucken mit Seitennumerierung
Sub Drucken()
For x = 1 To 10
Range("D15") = x
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Next x
End Sub
Gruß Hajo