Hola, JL.
Probá de esta manera:
* Hacer que esté visible la barra de herramientas "Cuadro de controles"
* A la hoja del presupuesto, agregar un control "Etiqueta" (o "Label" si lo tenés en inglés)
* Ubicar esta etiqueta en el lugar de la hoja donde quieras que salga impreso
* Agregar también un "Botón de Comando" ("CommandButton")
* Hacer un clic con el botón derecho del mouse sobre el botón recién agregado, seleccionar "Formato de control" y en la solapa "Propiedades", quitar el tilde a la opción "Imprimir objeto", para que, justamente, no se imprima el botón...
* Ahora, hacer un doble clic sobre el botón de comando (siempre que esté en el modo Diseño, para esto ver que esté presionado el primer botón de la barra "Cuadro de Controles", una escuadra y un lápiz)
Ahora estamos en el editor de código.
Debería quedar así:
Código:
Private Sub CommandButton1_Click()
Label1.Caption = "ORIGINAL"
Hoja1.PrintOut
Label1.Caption = "DUPLICADO"
Hoja1.PrintOut
End Sub
... y listo, con eso debería sacar un par de copias, la primera con la leyenda "Original" para el cliente, y la segunda, sería el duplicado para vos...
.
Marcadores