Excelのセル内のすべてのコメント書式を変更するにはどうすればよいですか？

ワークシートにコメントを挿入するとき、時々デフォルトのコメント書式を変更する必要があるかもしれません。コメントが数個だけなら手動で変更できますが、数百のコメントを変更する必要がある場合はどうしますか？

VBAコードを使用してすべてのコメント書式を変更する

すべてのコメント書式を迅速かつ時間節約で変更できる便利なツール

VBAコードを使用してすべてのコメント書式を変更する

次のVBAコードを使用すると、セル内のコメントのフォントサイズとフォントを変更できますが、フォントの色は変更できません。以下のVBAコードを使用してください：

1. 開発 > Visual Basic をクリックすると、新しい Microsoft Visual Basic for Applications ウィンドウが表示されます。挿入 > モジュール をクリックし、その後モジュールに次のコードをコピーして貼り付けます：

Sub FormatAllComments()
'Updateby20140509
Dim xWs As Worksheet
Dim xComment As Comment
For Each xWs In Application.ActiveWorkbook.Worksheets
    For Each xComment In xWs.Comments
        With xComment.Shape.TextFrame.Characters.Font
            .Name = "Times New Roman"
            .Size = 14
        End With
    Next
Next
End Sub

上記のコードでは、お好みに応じて .Name および .Size 変数を設定できます。

2次にクリックして ボタンを押してコードを実行します。そして レビュー > すべてのコメントを表示 をクリックしてコメントを確認します。ワークブック全体のすべてのコメント書式が変更されています。スクリーンショットをご覧ください：

すべてのコメント書式を迅速かつ時間節約で変更できる便利なツール

すべてのコメントに対して他の種類の書式を迅速に変更したい場合、Kutools for Excel の「コメント書式」機能を試してみてください。

Kutools for Excel: 300以上の便利なExcelアドインがあり、30日間無制限で無料体験できます。今すぐ入手

Kutools for Excel をインストール後、以下のステップに従ってコメント書式を変更してください：

1. 他のコメントにも適用したいスタイルで1つのコメントを書式設定します。

2. Kutools > その他 > コメント書式 をクリックします。スクリーンショットをご覧ください：

3. 「 コメント書式」ダイアログボックスで、「書式」タブをクリックし、コメント書式を変更したい範囲を選択します。「 現在のシート」または「全シート」を選択できます。その後、「特定のコメントセルを指定する」ボタンをクリックして、適用したい特定のコメント書式が含まれるセルを選択します。別のダイアログがポップアップして、変更されたセルの数を通知します。スクリーンショットをご覧ください：

4. OK > キャンセル ボタンをクリックしてダイアログボックスを閉じると、選択したセルのコメント書式が他のコメントに適用されます。

注意：

すべてのコメントセルでボールド体を使いたくない場合は、「ボールド体なし」オプションをチェックしてください。

「コメント書式 」に関するより詳細な情報は、「コメント書式」機能説明ページ。をご覧ください。

関連記事：

• • すべてのコメントの作成者名を変更する
• • すべてのコメントを新しいワークシートまたはワークブックにリスト化する
• • コメント内のテキストを検索して置換する
• • Excelですべてのコメントとコメントインジケーターを表示または非表示にする
• • Excelでセルの内容をコメントに変換する
• • Excelでコメントをセルの内容に変換する