¿Cómo imprimir una hoja oculta?

Danteamor me dio una macro para imprimir una hoja que estuviese especificada en una celda, la modifiqué para obtener el resultado que quería, y funciona perfectamente.

Si alguien pudiese ayudarme para que se pueda imprimir la hoja aunque esta está oculta.

La macro es la siguiente:

Sub Macro1()
hoja = Sheets("Hoja de compras").[F1]
Sheets(hoja).PrintPreview
End Sub

1 Respuesta

Respuesta
1

Prueba con lo siguiente

Sub Macro1()
    hoja = Sheets("Hoja de compras").[F1]
    Sheets(hoja).Visible = True
    Sheets(hoja).PrintPreview
    Sheets(hoja).Visible = False
End Sub

Saludos.Dante Amor

Si es lo que necesitas.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas