如何在多张纸上重复打印标题？

在我们的工作中，通常在每个页面的顶部重复打印标题行，但是您是否曾经尝试过在多张纸中重复打印标题行？ 在本文中，我有两种简单的方法可以在Excel中处理此问题。

使用VBA在多个工作表中重复打印标题

使用 Kutools for Excel 在多个工作表中重复打印标题

使用VBA在多个工作表中重复打印标题

没有内置功能可以在多张纸中重复打印标题，但是您可以使用宏来处理它。

1.激活工作簿中的第一张工作表，单击页面右下角的锚点 页面设置 组上 页面布局 标签。 看截图：

2.在 页面设置 对话框中，单击 片 标签，选择要重复打印的标题行 行重复在顶部和点击 OK。 看截图：

3。 按 Alt + F11键 启用 Microsoft Visual Basic应用程序 窗口中，单击 插页 > 模块 创造一个新的 模块.

4.然后将以下代码粘贴到空白脚本中，然后按 F5 运行代码。

VBA：在多张纸中重复打印标题

Sub SetAttributes()
'UpdatebyExtendoffice20170810
    Dim xSheet As Worksheet
    Dim xSheetOne As Worksheet
    Dim xSheets As Sheets
    Set xSheets = ActiveWorkbook.Worksheets
    Set xSheetOne = xSheets(1)
    For Each xSheet In xSheets
        xSheet.PageSetup.PrintTitleRows = xSheetOne.PageSetup.PrintTitleRows
    Next xSheet
End 

应用VBA之后，每张纸的第一行将在打印时在相应纸的顶部重复。

使用 Kutools for Excel 在多个工作表中重复打印标题

如果你已经安装 Kutools for Excel，您可以应用它 复制页面设置 快速将所有或特定页面设置从一张工作表复制到工作簿中的其他工作表。

安装后 Kutools for Excel，请执行以下操作：（立即免费下载Kutools for Excel！）

1.选择一张工作表，例如，选择Sheet1，然后单击页面右下角的锚点。 页面设置 组上 页面布局 标签。 看截图：

2.在 页面设置 对话框中，单击 片 标签，然后选择要从中重复打印的标题 行重复在顶部。 看截图：

3。 点击 OK，然后点击 Kutools 加 > 印刷 > 复制页面设置。 查看截图：

4.在 复制页面设置 对话框中，检查要在其中应用相同页面设置的工作表名称 复制到 列出，然后检查 行重复在顶部 ，在 附加选项 清单。 看截图：

5。 点击 Ok。 现在，在打印时已在多张纸的顶部重复了顶部的行。

  演示