印刷品質を設定(PageSetup.PrintQuality プロパティ)
PageSetup.PrintQuality プロパティ
PageSetup.PrintQuality プロパティを使用して、印刷品質を表す値を設定および取得することができます。設定する値は、解像度や品質を表す バリアント型(Variant)の値を指定しますが、使用するプリンタによって異なるので注意が必要です。
<取得>
object.PageSetup.PrintQuality ( index )
<設定>
object.PageSetup.PrintQuality ( index ) = variant
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- variant(index) ・・・ 水平方向の印刷品質(index = 1)または垂直方向の印刷品質(index = 2)を指定します。プリンターによっては、垂直方向の印刷品質をサポートしていない場合があります。この引数を省略すると、水平および垂直の両方向の印刷品質を含む 2 つの要素の配列を返します。
(例)水平の解像度 240dpi、垂直の解像度 140dpi を設定
Activesheet.PageSetup.PrintQuality = Array( 240, 140 )
(例)水平・垂直の解像度 300dpi を設定
Activesheet.PageSetup.PrintQuality = 300
PageSetup.PrintQuality プロパティ 使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
Sub Sample_PrintQuality() Dim w As Worksheet Set w = ActiveSheet '印刷品質を「標準印刷(高品質)」に設定 w.PageSetup.PrintQuality = -4 '※ 印刷品質:値 ' 標準印刷(高品質):-4 ' 簡易印刷(中品質):-3 ' 簡易印刷(低品質):-2 ' 下書き印刷 :-1 End Sub |
実行結果
サンプルVBAソースを実行後に「ページ設定」の「ページ」タブを確認
関連記事
-
-
背景に画像を表示(SetBackgroundPicture メソッド)
SetBackgroundPicture メソッド SetBackgroundP …
-
-
ブックのコピーを保存(SaveCopyAs メソッド)
SaveCopyAs メソッド SaveCopyAs メソッド は、現在開いてい …
-
-
別のブックのマクロを実行(Run メソッド)
別のブックのマクロを実行 別のブックのマクロを実行するには、Run メソッド を …
-
-
枠線の表示・非表示の設定(DisplayGridlines プロパティ)
枠線の表示・非表示の設定 枠線の表示・非表示を設定するには、DisplayGri …
-
-
行列番号を含めて印刷(PageSetup.PrintHeadings プロパティ)
PageSetup.PrintHeadings プロパティ PageSetup. …
-
-
スクロール範囲を限定(ScrollArea プロパティ)
ScrollArea プロパティ ScrollArea プロパティ にセル範囲を …
-
-
ワークシートの数を数える(Count プロパティ)
Count プロパティ 指定したWorksheets コレクションやSheets …
-
-
ワークシートをアクティブにする・選択する(Activate, Select)
Activate メソッド・Select メソッド Activate メソッドは …
-
-
イベントの発生・無効をコントロール(EnableEvents プロパティ)
EnableEvents プロパティ EnableEvents プロパティに T …
-
-
印刷の先頭のページ番号を設定(PageSetup.FirstPageNumber プロパティ)
PageSetup.FirstPageNumber プロパティ PageSetu …