请问表格怎么设置让它每点一次打印，里面的数字自动递增？

查看代码，复制以下代码到窗口（请根据说明修改参数）
Sub m()
For i = 1 To 5
ActiveSheet.PrintOut copies:=1
Cells(2, 2) = Cells(2, 2) + 1
Next
End Sub

代码详解：
1.Sub m()——这是宏名，无需理会；
2.For i = 1 To 5——这是控制打印次数，后面的177就是打印的页数，可以通过更改这个数值，来控制打印多少页；
3.ActiveSheet.PrintOut copies:=1——这是打印当前页的代码，无需理会；
4.Cells(2, 2) = Cells(2, 2) + i——这里的Cells(2,2)就是单元格B2，其中第一个2是行数，第二个2是列数，更改这两个数值，就可以控制让哪个单元格的数值变动；
5.Next——继续循环，无需理会；
6.End Sub——结束宏，无需理会。
（Cells(2, 2)也就是B2单元格，改为你要变的单元格，就是单据号单元格）
把B2换成箱数单元格就可以
这个可以和函数配合（建一个数据源），其它单元格也可以改变的。

表格甚至在他打印，每次打印的时候，里面的数字就会自动地中，那你可以在打印的时候，在里面设置它的数量。