Guardar varios archivos PDF con la misma macro

[mdussaillant]

Hola a todos, consulta como puedo hacer para que esta macro me guarde varios archivos en PDF

Sub Macro1()

Dim nombre As String
nombre = Range("d12").Value

    Range("A5:W51").Select
    ChDir "C:\INFORMES"
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:\INFORMES\" & nombre & ".PDF", Quality:=xlQualityStandard, IncludeDocProperties:=True _
        , IgnorePrintAreas:=False, OpenAfterPublish:=False
    
End Sub

[Haplox]

En 21/10/2020 at 21:03 , mdussaillant dijo:

Hola a todos, consulta como puedo hacer para que esta macro me guarde varios archivos en PDF

¿Pero lo harías de distintos rangos de la misma hoja, de distintas hojas?...

[mdussaillant]

Hola Haplox, siempre serian del mismo rango y la misma hoja, la idea es que me guarde con el nombre del registro que selecciona.

[Haplox]

Hace 16 horas, mdussaillant dijo:

siempre serian del mismo rango y la misma hoja, la idea es que me guarde con el nombre del registro que selecciona.

Lo siento, pero no entiendo qué pretendes ?

[mdussaillant]

Hola, gracias por tu preocupación, ya encontré la forma de hacerlo, gracias nuevamente.