エクセルで入力したコメントを別のセルや別のシートにコピーしたいとき、通常のコピー&ペーストではコメントまで一緒にコピーされてしまったり、逆にコメントだけがコピーされなかったりと、思い通りにいかないことがあります。
本記事では、エクセルのコメントをコピーする方法を詳しく解説します。コメントのみをコピーする手順、コメントの内容をセルに出力する方法、コメントの一覧を作成する方法、さらにコメントを検索する方法まで幅広くご紹介します。
「コメントだけを別のセルに貼り付けたい」「コメントの内容を一覧で確認したい」という方にもきっと役立つ内容です。ぜひ最後までお読みください。
エクセルのコメントをコピーするには「形式を選択して貼り付け」でコメントのみ指定する
それではまず、エクセルのコメントをコピーする方法の全体像について解説していきます。
エクセルで通常のコピー(「Ctrl」+「C」)&貼り付け(「Ctrl」+「V」)を行うと、セルの値・書式・コメントがすべて一緒にコピーされます。コメントだけをコピーしたい場合は「形式を選択して貼り付け」で「コメント」を指定する必要があります。この方法を使えば、貼り付け先のセルの値や書式を変えずにコメントだけを追加できます。
コメントのコピー方法まとめ
・コメントのみコピー:コピー後「Ctrl」+「Alt」+「V」→「コメント」を選択
・コメントをセルに出力:VBAでコメントのテキストをセルに書き出す
・コメント一覧の作成:VBAで全コメントをリスト形式で別シートに出力する
・コメントの検索:「検索と置換」またはジャンプ機能でコメントのあるセルを探す
まず、「形式を選択して貼り付け」でコメントだけをコピーする操作画面を確認しましょう。
「コメント」を選択して「OK」をクリックすると、貼り付け先のセルの値や書式を変えることなく、コメントだけをコピーして貼り付けることができます。複数のセルを選択してからコピーすれば、複数のコメントをまとめてコピーすることも可能です。
コメントをコピー・貼り付けする具体的な手順
続いては、コメントをコピーして別のセルや別のシートに貼り付ける具体的な手順を確認していきます。
コメントのみを別のセルにコピーする手順
コメントだけを別のセルにコピーする手順は以下のとおりです。まず、コメントのあるセルを選択して「Ctrl」+「C」でコピーします。次に、貼り付け先のセルを選択して「Ctrl」+「Alt」+「V」を押します。「形式を選択して貼り付け」ダイアログが開いたら「コメント」を選択して「OK」をクリックします。
この操作により、コピー元のセルのコメントがそのまま貼り付け先のセルに複製されます。貼り付け先にすでにコメントが入っている場合は上書きされる点に注意が必要です。
コメントを別のシートにコピーする手順
コメントを別のシートにコピーする場合も手順は同じです。コメントのあるセルをコピーし、別シートの貼り付け先を選択してから「形式を選択して貼り付け」→「コメント」を選択します。
複数シートにまたがって同じコメントをコピーしたい場合は、シートタブをShiftクリックでグループ化してから貼り付けると、グループ化したすべてのシートに同時に貼り付けることができます。
コメントをコピーするときの注意点
「形式を選択して貼り付け」の「コメント」でコピーできるのは従来の「メモ」形式のコメントです。スレッド形式の新しいコメントはこの方法ではコピーできない場合があります。また、コピー先にすでにコメントが存在する場合は確認なしに上書きされるため、事前に確認しておきましょう。
コメントの内容をセルに出力・一覧化する方法
続いては、コメントの内容をセルに書き出したり、一覧として整理する方法を確認していきます。
VBAでコメントの内容を隣のセルに出力する
コメントの内容をセルに出力することで、データとして管理しやすくなります。以下のVBAコードで、各行のコメントを隣の列のセルに書き出せます。
「cell.Comment.Text」でコメントのテキスト内容を取得し、「cell.Offset(0, 1).Value」で隣のセル(C列)に書き出します。コメントがないセルはスキップされるため、データが混在していても安心して実行できます。
全コメントを別シートに一覧出力するVBA
シート内のすべてのコメントをまとめて別シートに一覧として出力したい場合は、以下のコードが使えます。
Sub ListAllComments()
Dim ws As Worksheet
Dim logWs As Worksheet
Dim cmt As Comment
Dim i As Integer
Set ws = ThisWorkbook.Sheets(“Sheet1”)
Set logWs = ThisWorkbook.Sheets(“コメント一覧”)
logWs.Cells.Clear
logWs.Range(“A1:C1”).Value = Array(“セル番地”, “コメント内容”, “作成者”)
i = 2
For Each cmt In ws.Comments
logWs.Cells(i, 1).Value = cmt.Parent.Address
logWs.Cells(i, 2).Value = cmt.Text
logWs.Cells(i, 3).Value = cmt.Author
i = i + 1
Next cmt
MsgBox “一覧を出力しました!”
End Sub
このコードを実行すると「コメント一覧」シートに、セル番地・コメント内容・作成者の3列からなる一覧が自動で作成されます。事前に「コメント一覧」という名前のシートを作成しておく必要があります。
コメントを検索する方法
続いては、コメントのあるセルを検索して素早く見つける方法を確認していきます。
「検索と置換」でコメントの内容を検索する
コメントの内容を検索するには「Ctrl」+「F」で「検索と置換」ダイアログを開き、「オプション」をクリックして「検索対象」のプルダウンを「値」から「コメント」に変更します。検索したいキーワードを入力して「次を検索」または「すべて検索」をクリックすると、コメントに一致するテキストが含まれるセルが見つかります。
ジャンプ機能でコメントのあるセルをすべて選択する
コメントが入っているセルをすべて一括で選択したい場合は「ジャンプ」機能が便利です。「Ctrl」+「G」→「セル選択」→「コメント」を選択して「OK」をクリックすると、シート内のコメントがあるすべてのセルが選択された状態になります。
この状態でそのままコメントの一括削除・書式変更・コピーなどの操作が行えるため、コメントの場所がわからないときや、大量のコメントをまとめて操作したいときに非常に役立ちます。
コメントを検索・操作する際のポイントまとめ
| 目的 | 操作方法 | ポイント |
|---|---|---|
| 特定のキーワードを含むコメントを探す | Ctrl+F→検索対象を「コメント」に変更 | コメントの内容でテキスト検索できる |
| コメントのあるセルをすべて選択 | Ctrl+G→セル選択→「コメント」 | 一括操作(削除・コピー等)に活用できる |
| コメント内容をセルに書き出す | VBA(ExportCommentsToCell) | データとして管理・集計が可能になる |
| 全コメントを一覧化する | VBA(ListAllComments) | 別シートにセル番地・内容・作成者を出力 |
まとめ
本記事では、エクセルのコメントをコピーする方法と、セルへの出力・一覧化・検索について解説しました。
コメントだけをコピーするには「形式を選択して貼り付け」→「コメント」を選択するのが最も確実な方法です。コメントの内容をデータとして活用したい場合はVBAを使ってセルに書き出したり、一覧シートに出力したりする方法が便利です。
コメントの検索には「検索と置換」の検索対象を「コメント」に変更する方法と、「ジャンプ」機能でコメントのあるセルをすべて選択する方法を組み合わせると、効率よくコメントを管理できるでしょう。
ぜひ本記事の手順を参考に、エクセルのコメント管理をより便利に活用してください。