EXCEL表格中，如何一次打印多份文件，某个单元格自动累加

跟大佬学习

目前我设置的是打印一次自动+1，但是比如我想打99份，那么这个单元格如何自动给我从1累加到99，求大佬帮助。

比如一开始是000001，打印了一次后VBA自动变成了000002

代码如下：
Sub PR()
ActiveSheet.PrintOut
[J2] = [J2] + 1
End Sub

但是我想要的是，我点打印，打印份数8份，自动从000001累加到000008，还有就是如何每次点开宏后能手动输入打印份数。