Şifreli pdf nasıl yapılır?

[Tevfik_Kursun]

Merhaba Arkadaşlar,

Sub Pdf_Yap()
    
        dosya_adı = "Pdf_001"
        klasor = ActiveWorkbook.Path & "\Pdf\"
                
    Range("$AG$7:$BB$58").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        klasor & dosya_adı, Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub

Bu makro excelde $AG$7:$BB$58 arasındaki alanı, bulunduğu klasördeki Pdf adlı klasöre Pdf_001.pdf isimli dosya yapıyor. Bu pdf dosyaya şifre koymak mümkün müdür? Mümkünse nasıl?
Saygılarımla