如何在列印工作簿時排除特定的工作表？

如果您有一個包含多個需要列印的工作表的工作簿，但要排除其中特定的一個，是否有快速且簡單的方法可以讓我們在 Excel 中列印除了一個之外的所有工作表？

使用 VBA 程式碼在列印工作簿時排除特定工作表

使用 VBA 程式碼在列印工作簿時排除特定工作表

若要列印整個工作簿並排除特定的工作表，以下的 VBA 程式碼可以幫助您。

1. 按住 ALT + F11 鍵以打開 Microsoft Visual Basic for Applications 視窗。

2. 點擊 插入 > 模組，並將以下程式碼貼到模組視窗中。

VBA 程式碼：在列印工作簿時排除特定工作表：

Private Sub Printexclude()
'Updateby Extendoffcie
    Dim ws As Worksheet
    Dim strShName As String
    On Error Resume Next
    strShName = Application.InputBox("Enter the sheet name you want to exclude:", _
    "Kutools For Excel", , , , , , 2)
    Application.ScreenUpdating = False
    For Each ws In ThisWorkbook.Worksheets
        If ((ws.Visible = xlSheetVisible) And _
         (ws.Name <> strShName)) Then ws.PrintOut
    Next ws
    Application.ScreenUpdating = True
End Sub

3. 接著按下 F5 鍵執行此程式碼，會彈出一個提示框，提醒您輸入想要在列印工作簿時排除的工作表名稱，請參閱截圖：

4. 然後點擊 確定 按鈕，其他工作表將立即列印，並根據您的需求排除特定的工作表。

使用 Kutools AI 解鎖 Excel 的魔法

• 智能執行：執行單元格操作、分析數據並創建圖表——所有這些都由簡單的指令驅動。
• 自訂公式：生成量身定制的公式，簡化您的工作流程。
• VBA 編碼：輕鬆編寫和實現 VBA 代碼。
• 公式解釋：輕鬆理解複雜的公式。
• 文本翻譯：打破電子表格中的語言障礙。

通過人工智能工具增強您的 Excel 能力。立即下載，體驗前所未有的效率！