打印工作簿時(shí)如何排除特定的工作表？

如果您的工作簿包含需要打印的多個(gè)工作表，但排除了特定的工作表，那么是否有任何一種快速簡(jiǎn)便的方法可以讓我們打印除Excel中的一個(gè)以外的所有工作表？

使用VBA代碼打印工作簿時(shí)排除特定的工作表

使用VBA代碼打印工作簿時(shí)排除特定的工作表

若要打印整個(gè)工作簿，除了一個(gè)特定的工作表，以下VBA代碼可以為您提供幫助。

1。 按住 ALT + F11 鍵打開(kāi) Microsoft Visual Basic應(yīng)用程序 窗口。

2。 點(diǎn)擊 插頁(yè) > 模塊，然后將以下代碼粘貼到“模塊窗口”中。

VBA代碼：打印工作簿時(shí)排除特定的工作表：

Private Sub Printexclude()Updateby ExtendoffcieDim ws As WorksheetDim strShName As StringOn Error Resume NextstrShName = Application.InputBox("Enter the sheet name you want to exclude:", _"Kutools For Excel", , , , , , 2)Application.ScreenUpdating = FalseFor Each ws In ThisWorkbook.WorksheetsIf ((ws.Visible = xlSheetVisible) And _(ws.Name <> strShName)) Then ws.PrintOutNext wsApplication.ScreenUpdating = TrueEnd SubCopy

3。 然后按 F5 鍵以運(yùn)行此代碼，并彈出一個(gè)提示框，提醒您輸入在打印工作簿時(shí)要排除的工作表名稱，請(qǐng)參見(jiàn)屏幕截圖：

4。 然后點(diǎn)擊 OK 按鈕，其他工作表將立即打印出來(lái)，并根據(jù)需要排除特定的工作表。

最佳辦公生產(chǎn)力工具

將小時(shí)轉(zhuǎn)化為分鐘 Kutools for Excel!

準(zhǔn)備好增強(qiáng)您的 Excel 任務(wù)了嗎？ 利用的力量 Kutools for Excel - 您終極的節(jié)省時(shí)間的工具。 簡(jiǎn)化復(fù)雜的任務(wù)并像專業(yè)人士一樣瀏覽數(shù)據(jù)。 以閃電般的速度體驗(yàn) Excel！

為什么需要 Kutools for Excel