如何快速打印每张工作表的第一页？

如果您的工作簿包含多个工作表，并且您只需要打印每个工作表的第一页。实际上，您可以在打印设置中将页码设置为第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 Plus > 打印 > 打印每张工作表的第一页，随后会弹出一个 Kutools for Excel 对话框进行再次确认。参见截图：

单击后，每张工作表的第一页都会被打印出来。

相关文章：

如何用罗马数字页码打印页面？

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

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

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