Problema al Imprimir

Hola, tengo el siguente problema al imprimir, haber si me pueden ayudar.


Printer.PrintQuality = -1
Printer.PaperSize = vbPRPSLetter
Printer.FontSize = 7
Printer.Print "Aqui pongo lo que quiero imprimir"
Printer.NewPage


Lo que pasa es que no me toma el tamaño de la letra y siempre imprime en
letra 16 o mas. esto pasa cuando coloco "Printer.PrintQuality = -1", cuando
se lo saco o lo dejo en comentario hace todo bien, pero me imprime en
calidad alta y yo quiero imprimir en baja.

Gracias de Antemano...