How to revised macro code to repeat the recorded task without recording several times?

All Excel VBA experts,

I have macro recorded task and explaination as well here: macro.xlsm

I want to revised the code to repeat the task by 100 times without recording the whole 100 times task or copy and pasting the code. As easy code as possible.

Is it possible?

for i = 1 to 100

Range("J1").Select
ActiveCell.FormulaR1C1 = i
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False

next i

Hi,

Thanks you so much. It works perfectly.