如何快速打印每张纸的首页？

如果您的工作簿包含多个工作表，则只需要打印每张工作表的第一页即可。 实际上，您可以在打印设置中将页面1设置为1，然后一一打印。 但是，这将是麻烦且耗时的，是否有任何快速简便的方法可让您在Excel中打印每个选项卡的所有首页？

使用VBA代码打印每张纸的第一页

通过 Kutools for Excel 单击即可打印每张纸的第一页

使用VBA代码打印每张纸的第一页

以下VBA代码可帮助您同时快速打印每个工作表的所有第一页。 请执行以下操作：

1。 按住 ALT + F11 键，然后打开 Microsoft Visual Basic for Applications窗口.

2。 点击 插页 > 模块，然后将以下代码粘贴到 模块窗口。

VBA代码：打印每张纸的第一页

Sub PrintAllFirstPage()
'Update 20140924
Dim xWs As Worksheet
For Each xWs In Application.ActiveWorkbook.Worksheets
    xWs.PrintOut from:=1, To:=1
Next
End Sub

3. 然后按 F5 键以运行此代码，并且每个选项卡的所有第一页将同时打印。

通过 Kutools for Excel 单击即可打印每张纸的第一页

如果你有 Kutools for Excel 已安装，其中有多个打印工具，您可以使用 打印每个工作表的第一页 功能可打印每张纸的第一页。

后 免费安装 Kutools for Excel，请执行以下操作：

启用仅要打印每张纸第一页的工作簿，然后单击“确定”。 Kutools 加 > 印刷 > 打印每个工作表的第一页，然后a Kutools for Excel 弹出以再次确认。 看截图：

然后，单击后将打印每张纸的所有首页。

相关文章：

如何打印带有罗马数字页码的页面？

如何在Excel中打印多个工作簿？

如何在Excel中的一页上打印长列？

如何以工作表的相反顺序打印页面？