白黒印刷(PageSetup.BlackAndWhite プロパティ)
PageSetup.BlackAndWhite プロパティ
PageSetup.BlackAndWhite プロパティ を True に設定すると白黒で印刷します。値の取得および設定が可能です。
【書式】
<取得>
object.PageSetup.BlackAndWhite
<設定>
object.PageSetup.BlackAndWhite = boolean
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- boolean ・・・ True に設定すると対象となるオブジェクト( object )を白黒で印刷します。
PageSetup.BlackAndWhite プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
Sub Sample_PageSetupBlackAndWhite() Dim w As Worksheet Set w = ActiveSheet With w '印刷範囲を設定 .PageSetup.PrintArea = "B1:J26" '白黒で印刷 .PageSetup.BlackAndWhite = True '印刷プレビューを表示 .PrintPreview End With End Sub |
実行結果
サンプルVBAソース 実行前
実行後
関連記事
-
-
印刷時のページの番号付けの方向を設定(PageSetup.Order プロパティ)
PageSetup.Order プロパティ PageSetup.Order プロ …
-
-
ブックを別名で保存(SaveAs メソッド)
ブックを別名で保存(SaveAs メソッド) ブックの変更を保存したり、新規ブッ …
-
-
ブックを保存する(Save メソッド)
ブックを保存する(Save メソッド) 既存のブックを上書き保存するには、Sav …
-
-
ワークシートをファイルに保存する(SaveAs メソッド)
SaveAs メソッド ワークシートを名前を付けてファイルに保存します。Work …
-
-
ブックのファイル形式を調べる(FileFormat プロパティ)
ブックのファイル形式を調べる(FileFormat プロパティ) 指定したブック …
-
-
アウトライン記号の表示・非表示(DisplayOutline プロパティ)
アウトライン記号の表示・非表示(DisplayOutline プロパティ) Di …
-
-
印刷の倍率(拡大/縮小)(PageSetup.Zoom プロパティ)
PageSetup.Zoom プロパティ PageSetup.Zoom プロパテ …
-
-
行列番号を含めて印刷(PageSetup.PrintHeadings プロパティ)
PageSetup.PrintHeadings プロパティ PageSetup. …
-
-
ウィンドウの分割(Split プロパティ,SplitColumn プロパティ,SplitRow プロパティ)
ウィンドウの分割と解除 ウィンドウ(ワークシート画面)を分割するには、Split …
-
-
ブックのコピーを保存(SaveCopyAs メソッド)
SaveCopyAs メソッド SaveCopyAs メソッド は、現在開いてい …

