コメントを印刷する
従来のメモをシートの末尾に印刷する設定にします。
実行前に確認
- 設定だけを変更し、印刷はしません。［ファイル］→［印刷］のプレビューで確認してください。プリンター環境により利用できない設定があります。新しいスレッド形式のコメントではなく従来の「メモ」を想定します。
1サンプルコード
Sub Sample3086()
With ThisWorkbook.Worksheets("練習").PageSetup
.PrintComments = xlPrintSheetEnd
End With
End Sub図で見る操作の流れ
イメージ図コードに沿った概念図です。実際の画面や実行結果ではありません。
手動：準備
「練習」のA1に従来型のメモを作る
マクロ：配置を設定
PrintCommentsをxlPrintSheetEndにする
手動：確認
印刷プレビューでシート末尾のメモを確認
設定だけで実印刷はしません。スレッド形式コメントではなく従来のメモが対象です。
コードの処理を説明する模式図です。実際の画面や実行結果を撮影したものではありません。
使い方・実行手順を確認する3つの手順で、コードの使い方を確認できます
- 1
練習用のブックをExcelマクロ有効ブック（.xlsm）で保存します。練習シートにA1:F20程度のデータを入れます。A1に［校閲］→［メモ］→［新しいメモ］でメモを追加します。
- 2
Alt＋F11でVBEを開き、［挿入］→［標準モジュール］にコードを貼り付けます。
- 3
Sample3086内にカーソルを置いてF5で実行します。従来のメモをシートの末尾に印刷する設定にします。