...'Burayı siz kendi bilgisayarınızdaki masa üstüne göre değiştirin
fileName = currentDate & ".pdf"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, fileName:=fileName, Quality:=xlQualityStandard
MsgBox "PDF dosyası başarıyla oluşturuldu: " & fileName, vbInformation
End Sub
...dönüştürülmüş hali bulunmaktadır."
' Sayfa PDF'e dönüştürme işlemi
On Error Resume Next
Sheets(sheetName).ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfPath
On Error GoTo 0
If Err.Number <> 0 Then
MsgBox "PDF oluşturma hatası: " & Err.Description...
...= a
End If
Next
Sheets(2).Select
For Each sh In Sheets
If sh.Name <> s1.Name Then sh.Select False
Next
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ThisWorkbook.Path & "\Yazdır.pdf", _
OpenAfterPublish:=True
Application.DisplayAlerts = False
For...
Aktif Şablon Word dosyasını pdf kaydetmek için
wrdApp.ActiveDocument.ExportAsFixedFormat OutputFileName:= C:\dosyalar\pdfdosyaadi.pdf", ExportFormat:=wdExportFormatPDF
Kaydedilen pdf dosyalarını birleştirmek için pdftk.exe dosyasını araştırabilirsiniz.
Önce pdf leri oluşturun. Sonra işlem...
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.