印刷品質を設定(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ソースを実行後に「ページ設定」の「ページ」タブを確認
関連記事
-
-
ワークシートにクリップボードの内容を貼り付ける(Paste メソッド)
Paste メソッド 指定したワークシート上にクリップボードのデータを貼り付けま …
-
-
ブックが共有モードか確認する(MultiUserEditing プロパティ)
ブックが共有モードか確認する(MultiUserEditing プロパティ) 共 …
-
-
ブック・シートの名前を取得・設定(Name プロパティ)
ワークブックの名前を取得 Name プロパティで、ワークブックの名前を取得します …
-
-
印刷範囲の設定・解除(PageSetup.PrintArea プロパティ)
PageSetup.PrintArea プロパティ 印刷範囲を設定するには、Pa …
-
-
ブックの表示・非表示(Visible プロパティ)
ブック表示・非表示(Visible プロパティ) ブック(ウィンドウ)が表示され …
-
-
ウィンドウの位置を入れ替える(ActivatePrevious メソッド、ActivateNext メソッド)
ウィンドウの位置を入れ替える ActivatePrevious メソッド、Act …
-
-
枠線を含めて印刷(PageSetup.PrintGridlines プロパティ)
PageSetup.PrintGridlines プロパティ PageSetup …
-
-
ブックのファイル形式を調べる(FileFormat プロパティ)
ブックのファイル形式を調べる(FileFormat プロパティ) 指定したブック …
-
-
印刷・印刷プレビュー(PrintOut メソッド、PrintPreview メソッド)
PrintOut メソッド 印刷するには、PrintOut メソッド を使用しま …
-
-
印刷設定(ヘッダー/フッター)書式コード・VBAコード
印刷設定(ヘッダー/フッター)書式コード・VBAコード ヘッダーおよびフッター( …
