hola gente del foro,les hago la siguiente consulta:he visto un codigo,con el cual encuentra la ruta del archivo por mas que la cambie de dir o de pc y quiero grabarlo como un archivo pdf en el mismo dir y con el mismo nombre del archivo en uso (pero como pdf)adjunto ejemplo
Range("A1:F16").Select 'aca elijo el rango que quiero "grabar"
ActiveSheet.PageSetup.PrintArea = "$A$1:$F$16" 'esto tal vez no sea necesario
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
RUta = ThisWorkbook.Path & "\" 'asi hallo la ruta del archivo
nombre = "Libro.pdf" 'Nombre del archivo(es necesario?)[/CODE]
hola gente del foro,les hago la siguiente consulta:he visto un codigo,con el cual encuentra la ruta del archivo por mas que la cambie de dir o de pc y quiero grabarlo como un archivo pdf en el mismo dir y con el mismo nombre del archivo en uso (pero como pdf)adjunto ejemplo
Range("A1:F16").Select 'aca elijo el rango que quiero "grabar"ActiveSheet.PageSetup.PrintArea = "$A$1:$F$16" 'esto tal vez no sea necesario
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
RUta = ThisWorkbook.Path & "\" 'asi hallo la ruta del archivo
nombre = "Libro.pdf" 'Nombre del archivo(es necesario?)[/CODE]
Libro1.zip