如何防止用戶打印工作表？

在我們的日常工作中，工作表中可能包含一些重要信息，為了保護內部數據的擴展，部門將不允許我們打印它們。在這裡，我將討論如何防止用戶打印工作表。

防止用戶使用VBA打印一張指定的工作表

防止用戶使用VBA打印整個工作簿

防止用戶使用VBA打印一張指定的工作表

驚人的！在 Excel 中使用高效的選項卡，如 Chrome、Edge、Firefox 和 Safari！
每天節省50％的時間，並減少數千次鼠標單擊！

您可以應用以下VBA代碼來保護要打印的特定工作表。

1。激活您要禁用其打印功能的工作表。

2。按住 ALT + F11 鍵打開 Microsoft Visual Basic for Applications窗口.

3。然後在左邊 項目瀏覽器，雙擊 的ThisWorkbook 打開模塊，然後將以下代碼粘貼到其中：

VBA代碼：防止用戶打印一個指定的工作表

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140625
Dim WsName As String
WsName = "Sheet1"
For Each xWs In Application.ActiveWorkbook.Windows(1).SelectedSheets
    If xWs.Name = WsName Then
    MsgBox ("You can not print this worksheet")
        Cancel = True
    End If
Next
End Sub

文檔阻止打印-1

注意： 在上面的代碼中， Sheet1 是活動工作表，不允許您打印。

4。然後保存並關閉此代碼，現在當您嘗試打印此特定工作表時，將收到以下警告。

文檔阻止打印-1

備註：使用此代碼，不允許僅打印特定的工作表，但可以照常打印其他工作表。

防止用戶使用VBA打印整個工作簿

如果您需要防止用戶打印整個工作簿，那麼這裡也有一條代碼可以對您有所幫助。

1。打開您的工作簿，您不允許其他人打印。

2。按住 ALT + F11 鍵打開 Microsoft Visual Basic for Applications窗口。

3。然後在左邊 項目瀏覽器，雙擊 的ThisWorkbook 打開模塊，然後將以下代碼粘貼到其中：

VBA代碼：防止用戶打印一個指定的工作表

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140626
Cancel = True
MsgBox "You can't print this workbook"
End Sub

文檔阻止打印-1

4。然後保存並關閉此代碼，並返回到工作簿，現在當您打印一個工作表或整個工作簿時，將不允許打印它們，並且會收到以下警告：

文檔阻止打印-1

相關文章：

最佳辦公生產力工具

🤖	Kutools 人工智慧助手：基於以下內容徹底改變數據分析：智慧執行 \| 生成代碼 \| 建立自訂公式 \| 分析數據並產生圖表 \| 呼叫 Kutools 函數...
	熱門特色: 尋找、突出顯示或識別重複項 \| 刪除空白行 \| 合併列或儲存格而不遺失數據 \| 沒有公式的回合 ...
	超級查詢: 多條件VLookup \| 多值VLookup \| 跨多個工作表的 VLookup \| 模糊查詢 ....
	高級下拉列表: 快速建立下拉列表 \| 依賴下拉列表 \| 多選下拉列表 ....
	欄目經理: 新增特定數量的列 \| 移動列 \| 切換隱藏列的可見性狀態 \| 比較範圍和列 ...
	特色功能: 網格焦點 \| 設計圖 \| 大方程式酒吧 \| 工作簿和工作表管理器 \| 資源庫（自動文字） \| 日期選擇器 \| 合併工作表 \| 加密/解密單元格 \| 按清單發送電子郵件 \| 超級濾鏡 \| 特殊過濾器（過濾粗體/斜體/刪除線...）...
	前 15 個工具集: 12 文本工具 (添加文本, 刪除字符，...） \| 50+ 圖表類型 (甘特圖，...） \| 40+ 實用公式 (根據生日計算年齡，...） \| 19 插入工具 (插入二維碼, 從路徑插入圖片，...） \| 12 轉化工具 (數字到單詞, 貨幣兌換，...） \| 7 合併與拆分工具 (高級合併行, 分裂細胞，...） \| ... 和更多

使用 Kutools for Excel 增強您的 Excel 技能，體驗前所未有的效率。 Kutools for Excel 提供了 300 多種進階功能來提高生產力並節省時間。點擊此處獲取您最需要的功能...

產品描述

閱讀更多... 免費下載...

Office選項卡為Office帶來了選項卡式界面，使您的工作更加輕鬆

在Word，Excel，PowerPoint中啟用選項卡式編輯和閱讀，發布者，Access，Visio和Project。
在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
將您的工作效率提高 50%，每天為您減少數百次鼠標點擊！

閱讀更多... 免費下載...

Comments (5)

No ratings yet. Be the first to rate!

roadrunner

about 4 years ago

#30920