exportar datos de un listbox a pdf con una una ruta especifica de una carpeta por favor es urgente gracias 

¿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.

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