KutoolsforOffice— 1 つのソリューション、5 つの強力なツール。少ない労力で大きな成果。

Excel でコメントの数をカウントするにはどうすればよいですか?

著者Xiaoyang変更日

大規模なExcel ワークシートを扱う際、データに注釈を加えたり、フィードバックを提供したり、自分や共同作業者向けに重要なメモを強調表示するためにコメントを活用するのは一般的です。しかし、データ監査や品質保証、あるいは単にブックのドキュメント内容を確認する際に、ワークシート内にコメントがいくつあるかを素早く把握したい場面も少なくありません。コメント付きセルを正確にカウントすることで、重要なメモを見落としたり、誤って削除したりするリスクを回避できます。本チュートリアルでは、Excel でコメントを含むセルの数をカウントするための実用的な方法をいくつかご紹介します。組み込み機能から柔軟なコードベースのアプローチまで網羅しており、あなたのExcel スキルやワークフローのニーズに応じて最適な方法を選べます。

「ジャンプ」機能(特定の条件に一致するセルの選択)でコメントを含むセルの数をカウントする

ユーザー定義関数(UDF)でコメントを含むセルの数をカウントする

VBA コードでコメントを含むセルの数をカウントする


「ジャンプ」機能(特定の条件に一致するセルの選択)でコメントを含むセルの数をカウントする

Excel のジャンプ機能(「特定の条件に一致するセルの選択」)を使えば、ワークシート内のコメント(最新版のExcel では「ノート」とも呼ばれます)を含むすべてのセルを瞬時に視覚的に選択・カウントできます。この方法は、シンプルなカウントが必要で、かつコメントが表示可能でアクセス可能なワークシートを扱う際に特に迅速で効果的です!

1.リボンタブで、ホーム > 検索と選択 > ジャンプをクリックすると、「ジャンプ」ダイアログボックスが開きます。スクリーンショットを参照してください:

「ジャンプ」ダイアログを開く様子のスクリーンショット

2.「ジャンプ」ダイアログボックスで、選択対象セクションのコメントオプションを選択すると、ワークシート内の従来型コメントを含むすべてのセルが強調表示されます。スクリーンショットを参照してください:

「ジャンプ」ダイアログでコメントを選択している様子のスクリーンショット

3.OKをクリックして選択を適用します。アクティブなワークシート内でコメントが含まれるすべてのセルが強調表示されます。選択されたセルの数は、Excel ウィンドウ下部のステータスバーに表示されます。スクリーンショットを参照してください:

ステータスバーに計算結果が表示されている様子のスクリーンショット

適用可能なシナリオ:この方法は、手軽にチェックしたいときや、コメントの位置を視覚的に確認したいときに最適です。コーディングの知識は不要で、すべての標準版Excel でご利用いただけます。

制限事項:この方法では、Excel のバージョンによって、コメントが付いている空白セルがカウントされないことがあります。これは、選択範囲が事前の設定やExcel のビルドに応じて、値のないセルをスキップする場合があるためです。

ヒント:Ctrl + Gショートカットキーでジャンプダイアログボックスを開き、特定の条件に一致するセルの選択ボタンをクリックすれば、ジャンプ機能にすぐアクセスできます。

実用的なアドバイス:ワークシートに従来型コメントと新しいスレッド形式のノート(最近のExcel バージョンで導入)が混在している場合、ジャンプ機能では従来型コメントのみがカウントされます。スレッド形式の「ノート」または「コメント」については、以下に示す VBA ベースの方法を使用して、より正確な結果を得る必要があります。

トラブルシューティング:ステータスバーに「個数」が表示されない場合は、ステータスバーを右クリックして、ステータスバーメニュー内の「個数」オプションにチェックが入っているかをご確認ください。何も選択されていない場合は、正しいワークシート上にいることと、実際にコメントが存在することをあわせてご確認ください。


ユーザー定義関数(UDF)でコメントを含むセルの数をカウントする

「ジャンプ」機能は素早く便利ですが、常に包括的で動的なカウントを提供できるわけではありません。特に、空白セルや数式を含むコメント付きセルの数を定期的に監視する必要がある場合には、その限界が顕著になります。より柔軟な対応をご希望の場合は、Excel の VBA エディターを使ってユーザー定義関数(UDF)をご利用いただけます。この方法により、ワークシート上の数式から直接、空白セルを含むすべてのコメントをカウントすることが可能になります。

1ALT + F11を同時に押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。

2.VBA エディターで、挿入標準モジュールをクリックし、表示された空のモジュールウィンドウに次のコードを貼り付けてください。

VBA コード:コメントを含むセルの数をカウントする

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

3.コードを貼り付けて確認したら、VBA エディターを保存して閉じます。Excel のワークシートに戻り、カウント結果を表示したい任意の空白セルに次の数式を入力してください()A1:A100は実際の範囲に置き換えてください):

=countcomments(A1:A100)

ユーザー定義関数の使用方法を示すスクリーンショット

4Enterキーを押して関数を実行すると、セルに指定した制限範囲内のコメントの総数が表示されます。

パラメーターの説明:数式内の範囲(例:A1:A100)は、コメントをスキャンするセルを指定します。対象ワークシートの範囲に合わせて調整してください。

メリット:この方法では、空のセル内のコメントもカウントでき、動的データのシナリオに最適です。新しいコメントが追加または削除されると、自動的に更新されます。

注意点:関数を実行するにはマクロを有効にする必要があります。また、VBA コードをスレッド形式のコメント(一部のExcel バージョンでは「ノート」と呼ばれます)に対応するよう特別に更新しない限り、これらのコメントはカウントされません。

実用的なヒント:この UDF アプローチは、ワークシートを更新するたびにコメント数を自動的に再計算したい場合に非常に役立ちます。他のセルにこの数式をコピーする際は、目的の範囲に合わせてセル参照を忘れずに調整してください。


VBA コードでコメントを含むセルの数をカウントする

一度の操作で空のセルに含まれるコメントを含むすべてのコメントをカウントしたい場合や、大規模な範囲を素早く処理したい場合は、すぐに実行できる VBA マクロをご利用いただけます。この方法は、重複のないカウントや、ワークブック内のコメント使用状況に関する統計情報を効率的に収集する際に最適です。

1ALT + F11を押して、Excel のMicrosoft Visual Basic for Applicationsウィンドウを開きます。

2.VBA エディターで、挿入>標準モジュールをクリックして新しいモジュールを追加し、モジュールウィンドウに次のコードを貼り付けます:

VBA コード:コメントを含むセルの数をカウントする

Sub CountComments()
'Update by extendoffice
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キーを押すか(または)実行ボタン実行ボタンをクリックして)マクロを実行します。すると、コメントをカウントする範囲の選択を求めるダイアログが表示されます。スクリーンショットを参照してください:

VBAコードを実行した後にデータ範囲を選択している様子のスクリーンショット

4. 対象範囲を選択したら、OKをクリックします。選択範囲内で見つかったコメントの総数を示すメッセージボックスが表示されます。

結果を示すスクリーンショット

メリット:マクロは大規模で複雑な範囲にも対応可能で、空白セルと入力済みセルの両方を効率的に処理できます。

注意点:このマクロを実行するには、ワークブックでマクロを有効にしてください。ファイルを開く際にセキュリティ警告が表示される場合があります。標準の「元に戻す」コマンドでは取り消せない意図しない変更が発生するおそれがあるため、マクロ実行前に必ず作業内容を保存してください。

トラブルシューティング:マクロが範囲選択のプロンプトを表示しない場合は、モジュールが正しく挿入されており、コードに構文エラーがないことをご確認ください。コードを失わないよう、ワークブックは必ずマクロ有効ファイルとして保存してください。

適用範囲:ワークブックの注釈使用状況を把握する際に、数式駆動のセルではなく要約された結果が必要な場面、特にワークブックの監査やレポート作成に最適です。


追加の提案:マクロやセキュリティの制限が厳しい環境で作業する場合や、VBA に不慣れなユーザーと共同作業する際は、「ジャンプ」機能を試すか、Kutools などのアドインを使って、より高度なコメント管理機能をご活用ください。

関連記事:

Excel で新しいワークシートまたはワークブック内のすべてのコメントを一覧表示するには、どうすればよいですか?

Excel でコメント内のテキストを検索・置換するにはどうすればよいですか?

Excel で複数のセルに素早くコメントを挿入するには、どうすればよいですか?


最高の Office 業務効率化ツール

🤖KUTOOLS AI アシスタント:次に基づいてデータ分析を革新します:インテリジェント実行     コード生成  カスタム数式作成    データ分析とチャート生成  拡張機能呼び出し
人気の機能検索・ハイライト、または重複をマーキング     空白行を削除する     データを失うことなく列の結合またはセルを     数式を使用しない四捨五入...
スーパー LOOKUP複数条件 VLookup    複数値 VLookup     複数シート間 VLookup      ファジーマッチ....
高度なドロップダウンリストドロップダウンリストをすばやく作成     連動型ドロップダウンリスト     複数選択可能なドロップダウンリスト....
列マネージャー指定した数の列を追加列の移動非表示列の表示状態を切り替え範囲および列の比較...
注目の機能グリッドフォーカス     デザインビュー   強化された数式バー    ワークブックとシートマネージャー     リソースライブラリ(オートテキスト)  日付ピッカー     ワークシートの統合    暗号化/セルの復号化    リストからメール送信     スーパーフィルター      特殊フィルタ(太字のフォントを持つセルをフィルタリング/斜体/取り消し線。。。) 。。。
トップ15 ツールセット12 テキストツールテキストの追加特定の文字を削除、...)   50+チャートタイプガントチャート、...)   40+実用的関数誕生日に基づいて年齢を計算します、...)   19 挿入ツールQR コードを挿入パスから画像を挿入、...)   12 変換ツール単語に変換する為替レートの変換、...)   7 結合と分割ツール高度な行のマージセルの分割、...)さらに多数
Kutools はお好みの言語でご利用いただけます。英語、スペイン語、ドイツ語、フランス語、中国語、および40+の他の言語をサポートしています!

Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。


Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします

  • Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
  • 複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
  • 日々の生産性を50%も向上させ、毎日数百回ものマウスクリックを削減します!

すべてのKutools アドインが、たった1 つのインストーラーで完結。

Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。

ExcelWordOutlookTabsPowerPoint
  • オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン+Office Tab Pro
  • インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能(MSI 対応)
  • 連携してさらにパワーアップ— Office アプリ全体で生産性が向上
  • 30 日間のフル機能トライアル— 登録不要、クレジットカード不要
  • 最高のお得感— 個別アドイン購入よりお得