| Pregunta: | 60337 - CONTROL CARRO DE IMPRESORA |
| Autor: | seba tower |
| Hola necesito su ayuda. mi pregunta es respecto a como puedo hacer para que al imprimir una factura que ocupa la mitad de una hoja tamaño carta, el carro de la impresora no pase a la proxima pagina, sino que se situe inmediatamente en la mitad en blanco de la misma pagina impresa. que rutina o manejo es necesario al respecto muchas gracias saludos | |
| Respuesta: | Fernando Fumero |
| Debes establecer el nuevo tamaño de la hoja a imprimir. Private Sub BTN_FACTURAR_Click() Dim X_TIPOPAG As Integer X_TIPOPAG = Printer.PaperSize 'Se guarda el tamaño original Printer.PaperSize = vbPRPSA5 'Se ajusta a tamaño A5, 148 x 210 mm ' ' ' Escribes aquí las líneas de la factura. ' Obvio que éstas no pueden exceder el tamaño seleccionado. ' ' Printer.NewPage 'Obliga a avanzar a la otra página Printer.PaperSize = X_TIPOPAG 'Se reestablece el tamaño original Printer.EndDoc 'Termina una operación de impresión End Sub | |