如何在受保護的工作表中插入註釋？

一般而言，我們很容易在不受保護的工作表的單元格中插入註釋。 但是有時您需要設置密碼來保護您的工作表，並希望在受保護的表中插入註釋。 您如何在Excel中做到這一點？

通過選中“編輯對象”選項在受保護的工作表中插入註釋

使用VBA代碼在受保護的工作表中插入註釋

通過選中“編輯對象”選項在受保護的工作表中插入註釋

要將評論插入受保護的工作表中，您可以檢查 編輯對象 保護工作表時選擇該選項。 請執行以下操作：

1。 點擊 評論 > 保護工作表，請參見屏幕截圖：

2。 在 保護工作表 對話框中，在 取消保護表單的密碼 文本框，然後向下滾動並檢查 編輯物件 在選項 允許該工作表的所有用戶進行 列錶框，請參見屏幕截圖：

3。 然後點擊 OK，然後在 確認密碼 對話。

4。 然後點擊 OK 關閉對話框，現在您的工作表已受到保護，但是您可以在此工作表中插入註釋。

備註：使用此方法，您不僅可以插入註釋，還可以插入其他對象，例如圖片，圖表等。

使用VBA代碼在受保護的工作表中插入註釋

保護工作表時，除了選中“編輯對象”選項外，還可以應用以下VBA代碼。 下面的VBA將幫助您在單元格中插入註釋，然後保護工作表。 請這樣做：

1。 單擊要插入註釋的單元格。

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

3。 點擊 插入 > 模塊，然後將以下代碼粘貼到 模塊窗口.

VBA代碼：在受保護的工作表中插入註釋

Public Sub InsertComment()
'Update 20140723
Dim xPW As String
Dim xComment As String
xPW = “123456”
xTitleId = "KutoolsforExcel"
xComment = Application.InputBox("Input comments", xTitleId, "", Type:=2)
Application.ActiveSheet.Unprotect Password:=xPW
Application.ActiveCell.AddComment
Application.ActiveCell.Comment.Text Text:=xComment
ActiveSheet.Protect Password:=xPW
End Sub

4。 然後按 F5 鍵執行此代碼，然後會彈出提示框，在該框中，請根據需要輸入評論內容，請參見屏幕截圖：

5。 點擊 OK 關閉此框，並且您的註釋已插入到指定的單元格中，並且當前工作表同時受到保護。

注意：

1.您可以在以下位置將密碼修改為您自己的密碼 xPW =“ 123456” 以上代碼。

2.如果要插入其他註釋，只需選擇一個單元格並再次運行此代碼，然後輸入註釋內容。

相關文章：

如何在Excel中過濾帶有註釋的單元格？

如何對受保護的工作表中的行進行分組和取消分組？