行列番号を含めて印刷（PageSetup.PrintHeadings プロパティ）

サイト管理人

9年前

PageSetup.PrintHeadings プロパティ

PageSetup.PrintHeadings プロパティ に True を設定すると、行番号と列番号を含めて印刷することができます。値の取得および設定が可能で、ブール型（Boolean）の値を使用します。

【書式】

＜取得＞
object.PageSetup.PrintHeadings

＜設定＞
object.PageSetup.PrintHeadings = boolean

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
boolean ・・・ True を設定すると行番号・列番号を印刷します。

PageSetup.PrintHeadings プロパティ使用例

サンプルVBAソース

　
Sub Sample_PrintHeadings()

    Dim w As Worksheet
    Set w = ActiveSheet
    
    '行・列番号を印刷する設定
    w.PageSetup.PrintHeadings = True
    
    'ワークシートをプレビュー表示してから印刷
    w.PrintOut preview:=True

End Sub

Sub Sample_PrintHeadings()

Dim w As Worksheet

Set w = ActiveSheet

'行・列番号を印刷する設定

w.PageSetup.PrintHeadings = True

'ワークシートをプレビュー表示してから印刷

w.PrintOut preview:=True

End Sub

PageSetup.PrintHeadings プロパティ

引数・戻り値

PageSetup.PrintHeadings プロパティ 使用例

サンプルVBAソース

実行結果

PageSetup.PrintHeadings プロパティ使用例