如何防止Excel中的特定儲存格內容被刪除？

本文將介紹如何防止Excel中的特定儲存格內容被刪除。您可以使用本文中的方法來實現這一目標。

通過保護工作表來防止特定儲存格內容被刪除
使用VBA代碼防止特定儲存格內容被刪除

通過保護工作表來防止特定儲存格內容被刪除

默認情況下，工作表中的所有單元格都已被鎖定。如果您想防止特定儲存格內容被刪除，並在保護後使其他單元格可編輯，請按照以下步驟操作。

1. 點擊 工作表左上角的按鈕以選擇整個工作表。然後按下 Ctrl + 1 鍵以打開 設定儲存格格式 對話框。

2. 在彈出的「設定儲存格格式」對話框中，取消勾選「保護」標籤下的「鎖定」選項，然後點擊「確定」按鈕。請參見截圖：

3. 選擇您不希望內容被刪除的單元格，按下 Ctrl + 1 鍵再次打開「設定儲存格格式」對話框，在「保護」標籤下勾選「鎖定」選項，然後點擊「確定」按鈕。

4. 現在點擊「檢視」>「保護工作表」，然後在「保護工作表」和 「確認密碼」對話框中指定並確認您的密碼。

現在工作表已受到保護，並且指定的儲存格內容不會再被刪除。

使用 Kutools AI 解鎖 Excel 的魔法

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

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

使用VBA代碼防止特定儲存格內容被刪除

除了上述兩種方法外，您還可以運行VBA代碼來防止工作表中的特定儲存格內容被刪除。請按照以下步驟操作。

1. 打開包含不想被刪除的儲存格內容的工作表，右鍵單擊「工作表標籤」，然後從右鍵菜單中點擊「查看代碼」。

2. 將以下VBA代碼複製並粘貼到Microsoft Visual Basic for Applications窗口的代碼窗口中。

VBA代碼：防止Excel中的特定儲存格內容被刪除

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("A1:E7")) Is Nothing Then Exit Sub
    On Error GoTo ExitPoint
    Application.EnableEvents = False
    If Not IsDate(Target(1)) Then
        Application.Undo
        MsgBox " You can't delete cell contents from this range " _
        , vbCritical, "Kutools for Excel"
    End If
ExitPoint:
    Application.EnableEvents = True
End Sub

注意：在代碼中，A1:E17是您要防止其內容被刪除的區域範圍。您可以根據需要更改該範圍。

從現在開始，當您嘗試刪除範圍A1:E17中的儲存格內容時，您會看到如下截圖所示的Kutools for Excel對話框，請點擊「確定」按鈕。

相關文章：

• 如何防止Excel中的某個工作表被刪除？
• 如何防止在Excel中選擇多個工作表？