如何快速打印 Excel 中的隐藏工作表？

如果你有一个包含多个工作表的工作簿，其中一些工作表是可见的，而另一些是隐藏的，并且你只想打印隐藏的工作表，请按照以下步骤操作。由于 Excel 默认不允许直接打印隐藏的工作表，我将指导你使用一个简单的 VBA 代码来完成此操作：

1. 按下 "Alt" + "F11" 键以打开“Microsoft Visual Basic for Applications”窗口。

2. 在“Microsoft Visual Basic for Applications”窗口中，请点击“插入” > “模块”。然后将下面的 VBA 代码复制到代码窗口中。

VBA 代码：打印 Excel 中的隐藏工作表

Sub PrintHiddenSheets()
'Updated by Extendoffice 2024/07/15
Dim wSheet As Worksheet
Dim CurStat As Variant
For Each wSheet In ActiveWorkbook.Worksheets
If Not wSheet.Visible Then
CurStat = wSheet.Visible
wSheet.Visible = xlSheetVisible
wSheet.PrintOut
wSheet.Visible = CurStat
End If
Next
End Sub

2. 然后点击 按钮或按 F5 键运行代码。这将会打印工作簿中所有隐藏的工作表。