Imprimir.Objeto Printer
Publicado por Cesar (3 intervenciones) el 20/08/2001 22:16:07
Al darle el tamaño de la hoja
los valores de la impresora predeterminada no
cambian .Este es el codigo de las propiedades que estalesco
Dim X As Printer
For Each X In Printers
Set Printer = X
Exit For
Next
Printer.Orientation = 1
Printer.ScaleMode = vbUser
Printer.ScaleLeft = 0
Printer.ScaleTop = 0
Printer.Height = 18427
Printer.Width = 11907
Printer.Font.Name = "ms sans serif"
Printer.Font.Size = 9
los valores de la impresora predeterminada no
cambian .Este es el codigo de las propiedades que estalesco
Dim X As Printer
For Each X In Printers
Set Printer = X
Exit For
Next
Printer.Orientation = 1
Printer.ScaleMode = vbUser
Printer.ScaleLeft = 0
Printer.ScaleTop = 0
Printer.Height = 18427
Printer.Width = 11907
Printer.Font.Name = "ms sans serif"
Printer.Font.Size = 9
Valora esta pregunta
0