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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 最近使用したファイル（RecentFile オブジェクト,RecentFiles コレクション）

最近使用したファイル（RecentFile オブジェクト,RecentFiles …

: ワークシートをアクティブにする・選択する（Activate, Select）

Activate メソッド・Select メソッド Activate メソッドは …

: 別のブックのマクロを実行（Run メソッド）

別のブックのマクロを実行別のブックのマクロを実行するには、Run メソッドを …

: PDF または XPS 形式で出力（ExportAsFixedFormat メソッド）

ExportAsFixedFormat メソッドブックやシートの内容を PDF …

: 印刷：余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin

余白を設定する余白を設定する単位は、pt（ポイント：約 0.03528 cm） …

: 前後のワークシートを参照する（Previous プロパティ,Next プロパティ)

Previous プロパティ指定したシートの前（左側）のシートを参照します。 …

: 印刷する用紙の向きを設定（PageSetup.Orientation プロパティ）

PageSetup.Orientation プロパティ PageSetup.Or …

: 行列の見出しの表示・非表示（DisplayHeadings プロパティ）

DisplayHeadings プロパティ行と列の見出しの表示・非表示を設定お …

: ユーザー設定のビュー（CustomView オブジェクト）

ユーザー設定のビュー CustomView オブジェクトは、登録されている各ビュ …

: 並べて比較（CompareSideBySideWith,SyncScrollingSideBySide,BreakSideBySide）

並べて比較（CompareSideBySideWith メソッド） Compar …

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