¿Cómo establecer un área de impresión?

¿Será posible que si en una celda aparece el nombre de una hoja, al dar clic a un botón se pueda imprimir la hoja con el nombre que aparece en la celda?, todas las hojas ya tienen su área de impresión establecida.

1 respuesta

Respuesta
1

Te anexo la macro, cambia "Hoja1" y A5 por el nombre de la hoja y la celda en donde vas a poner el nombre de la hoja que se va a imprimir.

Sub Macro1()
    hoja = Sheets("Hoja1").[A5]
    Sheets(hoja).PrintOut Copies:=1, Collate:=True
End Sub

Saludos.Dante Amor

Recuerda valorar la respuesta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas