提示:其他語言是Google翻譯的。 你可以訪問 English 版本。
登入
x
or
x
x
註冊
x

or

如何統計在Excel中的評論數單元格?

你有沒有試圖計算工作表中的評論數量? 在本文中,我將向您介紹一些快速技巧,以計算在工作表中註釋多少個單元格。

使用“轉至特殊”功能計算包含註釋的單元格數量

用User Defined Function計算包含註釋的單元格數量

用VBA代碼計算包含註釋的單元的數量


箭頭藍色右泡 使用“轉至特殊”功能計算包含註釋的單元格數量


隨著 去特別 功能,您可以先選擇所有評論單元格,然後在狀態欄中查看計數編號。

1。 去點擊 首頁 > 查找和選擇 > 去特別,看截圖:

DOC-計數的意見,1

2。 在 去特別 對話框,請檢查 留言 選項下 選擇 部分,看截圖:

DOC-計數的意見,1

3. 然後點擊 OK 按鈕關閉此對話框,並且包含註釋的活動工作表中的所有單元格都被一次選中。 你可以在狀態欄中獲得評論的數量。 看截圖:

DOC-計數的意見,1

注意: 如果您的空白單元格有評論,則空白單元格評論將不會被統計。

類型: 你也可以按 Ctrl + G 快捷方式打開 轉到 對話框,然後單擊 特別 按鈕顯示 去特別 對話。


箭頭藍色右泡 用User Defined Function計算包含註釋的單元格數量

上述方法有其自身的缺點,因此我們可以創建一個用戶定義函數來計算所有單元格註釋,包括空白單元格註釋。

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

2。 點擊 插入 > 模塊,並將以下代碼粘貼到 模塊窗口.

VBA代碼:計算包含註釋的單元格數量

Function CountComments(xCell As Range)
'Update 20140924
    Application.Volatile
    CountComments = xCell.Parent.Comments.Count
End Function

3。 然後保存並關閉代碼,返回工作表,在一個空白單元格中輸入以下公式: = countcomments(A1)A1 是一個單元格引用,可以將其更改為任何其他單元格地址),請參見屏幕截圖:

DOC-計數的意見,1

4。 然後按 輸入 鍵,你會得到單元格評論的數量。


箭頭藍色右泡 用VBA代碼計算包含註釋的單元的數量

以下VBA代碼還可以幫助您計算所有單元格註釋,包括空白單元格註釋。

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

2。 點擊 插入 > 模塊,並將以下代碼粘貼到 模塊窗口.

VBA代碼:計算包含註釋的單元格數量

Sub CountComments()
'Update 20140924
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeComments)
If VBA.Err > 0 Then
    MsgBox 0
Else
    MsgBox WorkRng.Count
End If
End Sub

3。 然後按 F5 鍵來運行此代碼,並會彈出一個提示框來提醒您選擇要計算單元格註釋的數據范圍。 看截圖:

DOC-計數的意見,1

4. 然後點擊 OK,您將在選擇中獲得單元格註釋的數量。

DOC-計數的意見,1


相關文章:

如何在Excel中列出所有註釋到新工作表或工作簿?

如何查找和替換Excel中的評論文本?

如何在Excel中快速插入註釋到多個單元格?



推薦的Excel生產力工具

Kutools for Excel幫助您提前完成工作,並從人群中脫穎而出

  • 超過300強大的高級功能,專為1500工作場景設計,通過70%提高生產力,讓您有更多時間照顧家庭和享受生活。
  • 不再需要記憶公式和VBA代碼,從現在起讓你的大腦休息一下。
  • 成為3分鐘的Excel專家,複雜和重複的操作可以在幾秒鐘內完成,
  • 每天減少成千上萬的鍵盤和鼠標操作,現在告別職業病。
  • 110,000高效人才和300 +世界知名公司的選擇。
  • 60-day full功能免費試用。 60天退款保證。 2多年的免費升級和支持。

將選項卡式瀏覽和編輯帶到Microsoft Office,遠比瀏覽器的選項卡強大

  • Office選項卡專為Word,Excel,PowerPoint和其他Office應用程序設計:Publisher,Access,Visio和Project。
  • 在同一窗口的新選項卡中打開並創建多個文檔,而不是在新窗口中。
  • 通過50%提高您的工作效率,每天為您減少數百次鼠標點擊!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Ivan Meneses · 1 years ago
    Buenas tardes, me puede colaborar, que hacer para contar las celdas con comentarios dentro de un rango con Application.Volatile
  • To post as a guest, your comment is unpublished.
    ralph · 3 years ago
    sorry to say.. 9 of 10 times need the short 1 line answer.
    all this fancy dimm rap / buring the item need is just apita