Saltar al contenido

EXPORTAR LISTBOX A PDF


Recommended Posts

publicado

¿De dónde vienen esos datos? es decir ¿en dónde estaban antes de que los envíes al Listbox? ¿estaban en una hoja? ¿estaban en dicha hoja de forma ordenada? sin detalles es casi imposible entenderte y ayudarte.

publicado

Hola,

 

si lo configuras como area de impresion puedes usar esta macro..

Ruta = "c:\"
NomCarpeta = "pdfs"
If Dir(Ruta & "" & NomCarpeta, vbDirectory + vbHidden) = "" Then
MkDir Ruta & "" & NomCarpeta
End If
nombre = Ruta & "" & NomCarpeta & "\enviar.pdf"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
    nombre, Quality:=xlQualityStandard, _
    IncludeDocProperties:=True, IgnorePrintAreas:=False

 

 

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.