Macro para imprimir

1 Respuesta

Respuesta
1

Pues yo pondría unos condicionales, seria algo asi

sub Imprimir()

If E1=PF then

'''Aquí incluirá que le imprima la pagina 1

ActiveWindow.SelectedSheets.PrintOut Copies:=2, Collate:=True ' aquí te imprimirá el 'número de copias

end if

End sub

Bendiciones!.

Sigue imprimiendo todas las paginas

Prueba poniendo en Copies:=1 en cambio del 2.

Felicidades.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas