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

印刷品質を設定（PageSetup.PrintQuality プロパティ）

2015/10/13

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ソース

　
Sub Sample_PrintQuality()

    
    Dim w As Worksheet
    Set w = ActiveSheet
    
    '印刷品質を「標準印刷（高品質）」に設定
    w.PageSetup.PrintQuality = -4

    '※ 印刷品質：値
    '　標準印刷（高品質）：-4
    '　簡易印刷（中品質）：-3
    '　簡易印刷（低品質）：-2
    '　下書き印刷　　　　：-1


End Sub

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ソースを実行後に「ページ設定」の「ページ」タブを確認

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

Tweet

Message コメントをキャンセル

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

関連記事

: ユーザー設定のビュー（CustomViews プロパティ）

ユーザー設定のビュー CustomViews コレクションは、ユーザー設定ビュー …

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

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

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

PageSetup.PrintHeadings プロパティ PageSetup. …

: ウィンドウの分割（Split プロパティ,SplitColumn プロパティ,SplitRow プロパティ）

ウィンドウの分割と解除ウィンドウ（ワークシート画面）を分割するには、Split …

: ブック作成時のシート数の取得・設定（SheetsInNewWorkbook プロパティ）

SheetsInNewWorkbook プロパティ Excel で新規ブックに自 …

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

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

: ブックの表示を変更（View プロパティ）

ブックの表示を変更（View プロパティ） View プロパティで、ブックの表 …

: 印刷位置を中央に設定（CenterHorizontally, CenterVertically）

PageSetup.CenterHorizontally プロパティ PageS …

: ウィンドウの状態を取得・設定（WindowState プロパティ）

ウィンドウの状態を取得・設定（WindowState プロパティ） Window …

: 計算精度を設定する（PrecisionAsDisplayed プロパティ）

PrecisionAsDisplayed プロパティ PrecisionAsDi …

PREV: 印刷の用紙サイズを設定（PageSetup.PaperSize プロパティ）
NEXT: 印刷：余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin