Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

枠線を含めて印刷（PageSetup.PrintGridlines プロパティ）

2015/10/02

PageSetup.PrintGridlines プロパティ

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

【書式】

＜取得＞
object.PageSetup.PrintGridlines

＜設定＞
object.PageSetup.PrintGridlines = boolean

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
boolean ・・・ True を設定するとセルの枠線を印刷します。

PageSetup.PrintGridlines プロパティ使用例

サンプルVBAソース

　
Sub Sample_PrintGridlines()

    Dim w As Worksheet
    Set w = ActiveSheet
    
    '印刷範囲の設定
    w.PageSetup.PrintArea = "A1:K30"
    
    'セルの枠を印刷する設定
    w.PageSetup.PrintGridlines = True
    
    'ワークシートをプレビュー表示してから印刷
    w.PrintOut preview:=True

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

　

Sub Sample_PrintGridlines()

Dim w As Worksheet

Set w = ActiveSheet

'印刷範囲の設定

w.PageSetup.PrintArea = "A1:K30"

'セルの枠を印刷する設定

w.PageSetup.PrintGridlines = True

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

w.PrintOut preview:=True

End Sub

　

実行結果

- ブック・シートの操作 PageSetup プロパティ, PrintGridlines プロパティ, VBA基本, Worksheet オブジェクト, エクセルVBA, ブック・シートの操作, 印刷

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 印刷時のページの番号付けの方向を設定（PageSetup.Order プロパティ）

PageSetup.Order プロパティ PageSetup.Order プロ …

: シート見出しの表示・非表示（DisplayWorkbookTabs プロパティ）

シート見出しの表示・非表示（DisplayWorkbookTabs プロパティ） …

: ブックの表示・非表示（Visible プロパティ）

ブック表示・非表示（Visible プロパティ）ブック（ウィンドウ）が表示され …

: ブックを開く（Open メソッド）

ブックを開く（Open メソッド）ブックを開くには、Workbooks コレク …

: ウィンドウのタイトル（Window.Caption プロパティ）

ウィンドウのタイトル（Caption プロパティ） Windows.Captio …

: ワークシートのコピー・移動（Copy メソッド Move メソッド）

Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …

: 印刷のページ区切り（DisplayPageBreaks プロパティ）

DisplayPageBreaks プロパティ印刷したあとや印刷プレビューを表 …

: ワークシートをファイルに保存する（SaveAs メソッド）

SaveAs メソッドワークシートを名前を付けてファイルに保存します。Work …

: Excel を全画面表示（DisplayFullScreen プロパティ）

DisplayFullScreen プロパティ DisplayFullScree …

: ウィンドウ枠の固定（FreezePanes プロパティ、SplitColumn プロパティ,SplitRow プロパティ）

ウィンドウ枠の固定と解除ウィンドウ枠を固定するには FreezePanes プ …

PREV: 行列番号を含めて印刷（PageSetup.PrintHeadings プロパティ）
NEXT: セルのコメントを印刷（PageSetup.PrintComments プロパティ）