今天之间网超哥来为大家解答以上的问题。excel批量调整打印区域，excel批量设置打印区域相信很多小伙伴还不知道,现在让我们一起来看看吧！

1、第一步：编写自动设置打印区域的宏。

2、代码如下：Sub 打印区域自动选择()Dim I1, J1, I2, J2 As IntegerDim mYrange As RangeI1 = ActiveCell.RowJ1 = ActiveCell.ColumnI2 = I1J2 = J1Do While Cells(I2, J1) <> ""I2 = I2 + 1LoopI2 = I2 - 1Do While Cells(I1, J2) <> ""J2 = J2 + 1LoopJ2 = J2 - 1Set mYrange = Range(Cells(I1, J1), Cells(I2, J2))ActiveSheet.PageSetup.PrintArea = mYrange.AddressEnd Sub注：该代码运行前需将选择当前单元格为起始单元格，即行号、列号为最小。

3、程序是从这个单元格开始向下和向右查找非空单元格，然后得到需要设置打印区域的范围。

4、第二步：设置打印区域A1：C12.如图：第三步：选择单元格A1后运行宏。

5、如图：运行后，结果如图：。

本文就为大家分享到这里，希望小伙伴们会喜欢。