expression.PrintQuality(Index)
expression Required. An expression that returns a PageSetup object.
Index Optional Variant. Horizontal print quality (1) or vertical print quality (2). Some printers may not support vertical print quality. If you don’t specify this argument, the PrintQuality property returns (or can be set to) a two-element array that contains both horizontal and vertical print quality.
Example
This example sets the print quality on a printer with non-square pixels. The array specifies both horizontal and vertical print quality. This example may cause an error, depending on the printer driver you’re using.
Worksheets("Sheet1").PageSetup.PrintQuality = Array(240, 140)
This example displays the current setting for horizontal print quality.
MsgBox "Horizontal Print Quality is " & _
Worksheets("Sheet1").PageSetup.PrintQuality(1)