印刷品質を設定(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ソースを実行後に「ページ設定」の「ページ」タブを確認
関連記事
-
-
セルのコメントを印刷(PageSetup.PrintComments プロパティ)
PageSetup.PrintComments プロパティ PageSetup. …
-
-
枠線を含めて印刷(PageSetup.PrintGridlines プロパティ)
PageSetup.PrintGridlines プロパティ PageSetup …
-
-
行列番号を含めて印刷(PageSetup.PrintHeadings プロパティ)
PageSetup.PrintHeadings プロパティ PageSetup. …
-
-
数式バーの設定(DisplayFormulaBar, FormulaBarHeight)
数式バーの設定 数式バーの表示・非表示の設定を行うには、DisplayFormu …
-
-
ユーザー設定のビュー(CustomView オブジェクト)
ユーザー設定のビュー CustomView オブジェクトは、登録されている各ビュ …
-
-
印刷設定を高速化(PrintCommunication プロパティ)
PrintCommunication プロパティ PrintCommunicat …
-
-
ウィンドウを整列(Windows.Arrange メソッド)
ウィンドウを整列(Windows.Arrange メソッド) Windows コ …
-
-
印刷のタイトル行、タイトル列を設定(PrintTitleRows,PrintTitleColumns)
PageSetup.PrintTitleRows プロパティ PageSetup …
-
-
印刷設定(先頭ページのヘッダー・フッターを設定)DifferentFirstPageHeaderFooter, FirstPage
先頭ページに別のヘッダーおよびフッターを設定 先頭ページのヘッダーおよびフッター …
-
-
ワークシートをアクティブにする・選択する(Activate, Select)
Activate メソッド・Select メソッド Activate メソッドは …
