Excel工作簿下多个工作表，如何批量设置每页打印顶端标题行的方法？即每页要打印每个工作表规定1至7行。

发布网友发布时间：2022-04-26 14:25

我来回答

共5个回答

热心网友时间：2023-10-10 08:10

通过页面设置即可操作：

1.在页面布局中，选择“打印标题”；

2.点击顶端标题行，进行顶端标题的设置；

3.选择1-7行，这样就可以进行打印，每一页的打印都会显示这些内容。

热心网友时间：2023-10-10 08:10

每页的打印标题行一致吗?如果一致,全选所有工作表,然后按照正常设置方式来设置打印顶端标题行就好了

热心网友时间：2023-10-10 08:11

1、单击第一个工作表标签，按下键后单击最后一个工作表标签。此时选中全部工作表。
2、依照常规方法设置顶端标题行。

热心网友时间：2023-10-10 08:11

原文：如何用vba设置工作表的打印顶端标题行和重复打印列？

使用VBA批量设置，按需删除一些代码即可

Sub QQ1722187970()
Excel.Application.ScreenUpdating = False
Excel.Application.Calculation = xlCalculationManual
Dim oWK As Worksheet
For Each oWK In Excel.ThisWorkbook.Worksheets
With oWK.PageSetup
'设置为打印重复行
.PrintTitleRows = "$1:$1"
'设置打印重复列
.PrintTitleColumns = "$A:$D"
'设置为空字符取消打印标题行设置
.PrintTitleRows = ""
'设置为False同样取消之前的设置
.PrintTitleColumns = False
End With
Next
Excel.Application.ScreenUpdating = True
Excel.Application.Calculation = xlCalculationAutomatic
End Sub

热心网友时间：2023-10-10 08:12

文件，页面设置，工作表，顶端标题行，只能一个表一个表设置追问我有太多的工作表了，有没有用宏代码更快的方法来实现呢？

追答是很多工作表，还是工作表文件？如果每个表的表头行数都一样是可以写宏代码来实现。