1. iTextSharp: Popüler bir PDF oluşturma kütüphanesidir 1. Aşağıdaki örnek kod, iTextSharp kullanarak bir PDF dosyası oluşturmayı göstermektedir:

Imports iTextSharp.text
Imports iTextSharp.text.pdf

Public Sub CreatePDF()
    ' Yeni bir PDF belgesi oluştur
    Dim document As New Document()

    ' PDF yazarını oluştur
    Dim writer As PdfWriter = PdfWriter.GetInstance(document, New FileStream("output.pdf", FileMode.Create))

    ' PDF'yi aç
    document.Open()

    ' PDF'ye içerik ekle (örneğin, metin)
    document.Add(New Paragraph("Hello, World!"))

    ' PDF'yi kapat
    document.Close()
End Sub
Kopyala

2. PDFSharp: Başka bir PDF oluşturma kütüphanesidir 1. Aşağıdaki örnek kod, PDFSharp kullanarak bir PDF dosyası oluşturmayı göstermektedir:

Imports PdfSharp.Pdf
Imports PdfSharp.Pdf.IO

Public Sub CreatePDF()
    ' Yeni bir PDF belgesi oluştur
    Dim document As New PdfDocument()

    ' Yeni bir sayfa ekle
    Dim page As PdfPage = document.AddPage()

    ' Grafik nesnesi oluştur
    Dim gfx As XGraphics = XGraphics.FromPdfPage(page)

    ' Sayfaya metin çiz
    gfx.DrawString("Hello, World!", New XFont("Arial", 12), XBrushes.Black, New XRect(10, 10, page.Width.Point, page.Height.Point), XStringFormats.TopLeft)

    ' PDF'yi kaydet
    document.Save("output.pdf")
End Sub
Kopyala

1. Microsoft Office uygulamasında VBA editörünü açın (2003 ve öncesi için "File" > "Tools" > "Macros" > "Visual Basic Editor"; 2007 için "Developer tab" > "Visual Basic") 3.
2. Kod penceresinde bir yere tıklayın ve PDF dosyasını açmak için aşağıdaki kodu ekleyin [