Imprimir página | Cerrar ventana

Configurar hoja para pasarla a pdf

Impreso de: Foro de Access y VBA
Categoría: Otros de Microsoft: Windows y Office
Nombre del foro: Excel
Descripción del foro: Foro de Excel y VBA de Excel
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=71855
Fecha de impresión: 13/Noviembre/2019 a las 01:19


Tema: Configurar hoja para pasarla a pdf
Publicado por: Ruchigol
Asunto: Configurar hoja para pasarla a pdf
Fecha de publicación: 20/Enero/2012 a las 16:12
Hola de nuevo!!
Estoy intendo hacer un codigo para pasar una hoja excel a pdf, buscando informacion he conseguido crear una macro que me lo hace perfectamente desde mi ordenador como esta:
 
Sub Print_to_PDF()

 Dim RutaArchivo As String
 RutaArchivo = "Q:\favorites" + Cells(4, 5) + Cells(5, 5) + ".pdf" 'aqui pongo el nombre del archivo
 Range("c1:j6").Select 'rango donde tengo los datos que voy a pasar a pdf
 Range("j6").Activate
 Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
 RutaArchivo, _
 Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
 :=False, OpenAfterPublish:=False
 Range("i6").Select
 End Sub
 
El problema me resulta que dentro de mi hoja de calculo no solo quiero imprimir a pdf el rango (c1:j6) tambien quiero imprimir otros muchos rangos siguiendo un orden y a la vez que todos se adapten al formato de un pdf. No se como puedo hacer para seleccionar otros rangos por ejemplo (f20:u53) y que se me adapten bien a la hoja de pdf creada
 
Muchas gracias por cualquier ayuda



Respuestas:
Publicado por: Emilio
Fecha de publicación: 20/Enero/2012 a las 17:37
Hola!
 
Cita que todos se adapten al formato de un pdf
 
Lo siento pero no entiendo que quieres decir con eso.


-------------
Saludos a todos desde Huelva

http://www.mvp-access.es/emilio/" rel="nofollow - http://www.mvp-access.es/emilio/


Publicado por: Ruchigol
Fecha de publicación: 20/Enero/2012 a las 19:06
Me refiero a que si quiero pasar a pdf un rango (por ejemplo A1:Z80), el ancho de la hoja de pdf deberia ser igual a este rango, no se si hay forma de programar esto???.
Digo esto porque en mi caso mi rango era mas ancho de lo que llevaba una hoja de pdf y me imprimia todo mal organizado en hojas, cortandome tablas y asi.
 
De todas formas ya he solucionado el problema insertando otra hoja nueva en la que en este caso si que adapto mis tablas al ancho de la hoja del pdf con este mismo programa. Una solucion algo chapuza pero para mi caso funciona.
 



Imprimir página | Cerrar ventana