Excelでコメントをセルの内容に変換するにはどうすればよいですか？
ワークシートにコメントで埋められた範囲セルがあるとします。次に、すべてのコメントをセルの内容に変換して、きれいに丸く印刷できるようにします。 このタスクを解決するための良い方法はありますか？
Kutools forExcelを使用してコメントをセルの内容に変換する
ユーザー定義関数を使用してコメントをセルの内容に変換する
この方法を使用するには、最初に定義済みの関数を作成してから、定義済みの数式を適用してコメントをセルの内容に変換する必要があります。 次の手順で完了できます。
1。クリック Developer > ビジュアルベーシック、新しいです アプリケーション用のMicrosoftVisual Basic ウィンドウが表示されたら、をクリックします インセット > モジュール、および次の関数をモジュールに入力します。
関数GetComments（pRng As Range）As String'Updateby20140509 If Not pRng.Comment Is Nothing Then GetComments = pRng.Comment.Text End If End Function
2.イベント Ctrl + Sキー 関数を保存します。
3次に、次の式を入力します。= GetComments（A1）空白のセルでは、この場合、セルE1を使用します。 スクリーンショットを参照してください：
4。 プレス 入力します キー。 セルE1を選択し、この数式を含めるセルの範囲に塗りつぶしハンドルをドラッグします。 そして、すべてのコメントはセルの内容に変換されます。 スクリーンショットを参照してください：
コメントをVBAコードでセルの内容に変換する
VBAコードを知っている場合は、次の簡単なコードもコメントをセルの内容に変換するのに役立ちます。
1。 セルの内容に変換する範囲を選択します。
2に設定します。 OK をクリックします。 Developer > ビジュアルベーシック、新しいです アプリケーション用のMicrosoftVisual Basic ウィンドウが表示されたら、をクリックします インセット > モジュール、および次のコードをモジュールに入力します。
Sub CommentToCell()
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)
For Each Rng In WorkRng
Rng.Value = Rng.NoteText
Next
End Sub
3。 次に、をクリックします 
ボタンを押してコードを実行します。 変換する範囲を選択して、をクリックします OK、および選択したすべてのコメントは、関連するセルのセルコンテンツに変換されています。
 |
 |
 |
Note：コメントが不要な場合は、削除できます。
Kutools forExcelを使用してコメントをセルの内容に変換する
Kutools for Excel ：300以上の便利なExcelアドインがあり、30日以内に制限なしで無料で試すことができます。今すぐ入手 .
コメントとセルを変換する of Kutools for Excel は、コメントに関する多くの問題を解決するのに役立つ便利で便利なツールです。
インストールした後 Kutools for Excel、次のようにしてください。
1。 コメントをセルにインポートする範囲を選択します。
2に設定します。 OK をクリックします。 クツール > その他 > コメントとセルを変換する、スクリーンショットを参照してください：
3。 の中に コメントとセルを変換する ダイアログボックスで コメントをセルのコンテンツに変換する。 スクリーンショットを参照してください：
4。 次に、をクリックします OK。 これで、選択したすべてのコメントが元の範囲のセルコンテンツに変換されます。
詳細については、 コメントとセルを変換する、ご覧ください。 コメントとセル機能の説明を変換する.
関連記事：
- セル内のすべてのコメント形式を変更する
- すべてのコメントの作成者名を変更する
- 新しいワークシートまたはワークブックへのすべてのコメントを一覧表示します
- コメント内のテキストを検索して置換する
- Excelですべてのコメントとコメントインジケーターを表示または非表示にする
- Excelでセルの内容をコメントに変換する
最高のオフィス生産性向上ツール
| 🤖 | Kutools AI アシスタント: 以下に基づいてデータ分析に革命をもたらします。 インテリジェントな実行 | コードを生成 | カスタム数式の作成 | データを分析してグラフを生成する | Kutools関数を呼び出す... |
| 人気の機能: 重複を検索、強調表示、または識別する | 空白行を削除する | データを失わずに列またはセルを結合する | 数式なしのラウンド ... | |
| スーパールックアップ: 複数の基準の VLookup | 複数の値の VLookup | 複数のシートにわたる VLookup | ファジールックアップ .... | |
| 詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する | 依存関係のドロップダウン リスト | 複数選択のドロップダウンリスト .... | |
| 列マネージャー: 特定の数の列を追加する | 列の移動 | Toggle 非表示列の表示ステータス | 範囲と列の比較 ... | |
| 注目の機能: グリッドフォーカス | デザインビュー | ビッグフォーミュラバー | ワークブックとシートマネージャー | リソースライブラリ (自動テキスト) | 日付ピッカー | ワークシートを組み合わせる | セルの暗号化/復号化 | リストごとにメールを送信する | スーパーフィルター | 特殊フィルター (太字/斜体/取り消し線をフィルター...) ... | |
| 上位 15 のツールセット: 12 テキスト ツール (テキストを追加, 文字を削除する、...） | 50+ チャート 種類 (ガントチャート、...） | 40+ 実用的 式 (誕生日に基づいて年齢を計算する、...） | 19 挿入 ツール (QRコードを挿入, パスから画像を挿入、...） | 12 変換 ツール (数字から言葉へ, 通貨の換算、...） | 7 マージ＆スプリット ツール (高度な結合行, 分割セル、...） | ... もっと |
Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。 最も必要な機能を入手するにはここをクリックしてください...
Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作業をはるかに簡単にします
- Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
- 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
- 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
