如何在多个工作表中重复打印标题？

在每页顶部打印标题行是一种常见做法，但您是否尝试过在多个工作表中重复打印标题行呢？在本文中，我将介绍两种简单的方法来解决Excel中的这个问题。

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

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

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

Excel中没有内置功能可以在多个工作表中重复打印标题，但您可以使用宏来处理它。

1. 激活工作簿中的第一个工作表，单击 页面设置 组右下角的锚点，位于 页面布局 选项卡中。见截图：

2. 在 页面设置 对话框中，点击 工作表 选项卡，从 顶端标题行中选择要重复打印的标题行，并点击 确定。见截图：

3. 按下 Alt + F11 键以启用 Microsoft Visual Basic for Applications 窗口，点击 插入 > 模块 以创建一个新的 模块.

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. 点击 确定，然后点击 Kutools Plus > 打印 > 复制页面配置。见截图：

4. 在 复制页面配置 对话框中，勾选要在 复制至 列表中应用相同页面设置的工作表名称，然后勾选 顶端标题行 在 选项 列表中。见截图：

5. 点击确定。现在，顶部行将在多个工作表中重复打印。

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