Guardar celdas seleccionadas en pdf desde excel
Hola, tengo una macro para guardar las celdas seleccionadas en pdf en una carpeta de mi pc.
He conseguido que me funcione a medias, porque me la guarda en una carpeta distinta.
Aquí dejo la macro
Sub GUARDARCOMPRAPDF()
Worksheets("compras").Range("A5:H32").Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:="D:\Descargas\Archivos Varios\Kiko\BD JUEGOS\PDF de Compra" & Range("B12").Value
End Sub
He conseguido que me lo guarde en una carpeta anterior a la dirección que puse en la macro, concretamente en:
D:\Descargas\Archivos Varios\Kiko\BD JUEGOS
y yo quiero que me la guarde en
D:\Descargas\Archivos Varios\Kiko\BD JUEGOS\PDF de Compra
Lo mismo en ventas, me las guarda en:
D:\Descargas\Archivos Varios\Kiko\BD JUEGOS
Y yo quiero que me las guarde en:
D:\Descargas\Archivos Varios\Kiko\BD JUEGOS\PDF de Venta
A ver si puedes ayudarme crack.
1 Respuesta
Te falta una diagonal \
Te anexo las 2 macros
Sub GUARDARCOMPRAPDF()
ruta = "D:\Descargas\Archivos Varios\Kiko\BD JUEGOS\PDF de Compra"
Worksheets("compras").Range("A5:H32").Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ruta & "\" & Range("B12").Value
End SubSub GUARDARVENTAPDF()
ruta = "D:\Descargas\Archivos Varios\Kiko\BD JUEGOS\PDF de Venta"
Worksheets("compras").Range("A5:H32").Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ruta & "\" & Range("B12").Value
End SubSaludos.Dante Amor
No olvides valorar la respuesta.
