(12/02/2020, 21:30)berduş yazdı: Filename:= _
        ActiveWorkbook.Path & "\" & ilk & "_" & son & "_Arası.pdf" burası dosya adresi ve adının olduğu yerdir
oraya istediğinizi yazarsınız
Filename:= _
        DosyaAdresi & "\" & dosyaAdı & ".pdf"

burada belirttiğim gib değişiklikleri kendiniz de yapabilirsiniz.