USERFORM'DAN SAYFA PDF ÇIKTI ALMA

[cocoa35]

Arkadaşlar merhaba; aşağıdaki kod'lar ile userform üstündeki commandbuton vasıtası ile istemiş olduğunuz bir sayfanın PDF çıktısı alınabiliyor. Ancak bu kod'lar örneğin Office 2019 'da rahat çalışıyor ancak Office 365 yüklü bilgisayarda hata veriyor! acaba sorun nerde?

Private Sub CommandButton1_Click()

With Sheets("PROSES")
.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:=ThisWorkbook.Path & "\Tesis Konfigürasyon.pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End With

End Sub

 

[Korhan Ayhan]

Merhaba,

Şöyle deneyiniz.

Ofis 365 olan bir bilgisayarda makro kaydet yöntemi ile bir sayfayı PDF olarak kaydedin.
Sonra makro kaydını durdurun. Oluşan kodları bu kod ile karşılaştırın. Arada fark varsa gerekli düzenlemeyi yaparsınız.