Pasar hojas de un libro a archivos en pdf

me gustaría saber si es posible, teniendo un libro con varias hojas, pasar cada una de esas hojas a un archivo pdf y que cada uno migre con el nombre de la hoja. Versión 2003

1 Respuesta

Respuesta
1

Te mando la solución. Ejecuta esta macro y todo listo!

Sub hacerpdf()
For Each hoja In ActiveWorkbook.Sheets
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=hoja.Name
Next
End Sub

Guardará los pdf en el directorio predeterminado de excel. (búscalos al acabar el proceso)

si quieres especificar un destino fijo escríbelo así. ejemplo:

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="c:\xxx\kk\" & hoja.Name

Recuerda finalizar y puntuar la consulta

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas