Bu makalede, size herhangi bir belgeyi PDF'e nasıl yazdırabileceğinizi göstereceğim VBA Excel'de ExportAsFixedForma t yöntemi VBA Bu yöntemin tüm parametrelerini uygun örnekler ve çizimlerle tartışacağım.

Excel VBA'da PDF'ye Yazdırma (Hızlı Görünüm)

Alıştırma Çalışma Kitabını İndirin

Bu makaleyi okurken pratik yapmak için bu alıştırma çalışma kitabını indirin.

ExportAsFixedFormat Deyimine Giriş

⧭ Genel Bakış:

Bu ExportAsFixedForma t yöntemi VBA ile verilen herhangi bir belgeyi verilen bir adla PDF biçiminde kaydeder. VBA Bu, çok sayıda Excel çalışma sayfasıyla çalışan ve bunları ileride kullanmak üzere saklayanlar için oldukça kullanışlı bir yöntemdir.

⧭ Sözdizimi:

VBA'nın sözdizimi ExportAsFixedFormat yöntemdir:

 Document.ExportAsFixedFormat Type, Filename, Quality, IncludeDocProperties, IgnorePrintAreas, From, To, OpenAfterPublish 

⧭ Parametreler:

⧭ Dönüş Değeri:

Bir Excel çalışma kitabının çalışma sayfalarını PDF belgesi olarak dönüştürür ve belirtilen adla belirtilen klasöre kaydeder.

5 ExportAsFixedFormat Deyimi ile Excel VBA'da PDF'ye Yazdırma Örnekleri

Excel'de bir belgenin PDF'ye nasıl yazdırılacağına dair birkaç örnek inceleyelim VBA ile ExportAsFixedFormat yöntem.

Örnek 1: Excel VBA'da Ad veya Yol Belirtilmeden PDF'ye Yazdırma

Burada Marin Bookstore adlı bir kitapçının kitap kayıtlarını içeren bir çalışma sayfamız var.

Basit bir şey yazalım VBA kodu, çalışma sayfasını bir PDF belgesine dönüştürmek için herhangi bir ad veya yol belirtmez.

⧭ VBA Kodu:

 Sub Print_To_PDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF End Sub 

⧭ Çıkış:

Bu kodu çalıştırdığınızda, çalışma kitabınızla aynı klasörde (yol belirtilmediğinde varsayılan klasör) çalışma kitabınızla aynı ada (ad belirtilmediğinde varsayılan ad) sahip bir PDF dosyası bulacaksınız.

Burada şu şekilde adlandırılmıştır Kitap1.pdf çalışma kitabımın adı Kitap1 .

Daha Fazla Oku: Excel VBA: Yazdırma Alanı Dinamik Olarak Nasıl Ayarlanır (7 Yol)

Örnek 2: Excel VBA'da Ad ve Yol Belirtilerek PDF'ye Yazdırma

Şimdi aynı çalışma kitabını adını ve yolunu belirterek başka bir PDF dosyasına dönüştüreceğiz.

PDF'yi şu isimle kaydedeceğim "Martin Bookstore.pdf" yol içinde C:\Users\Public\ExcelWIKI Bilgisayarımda. VBA kod olacak:

⧭ VBA Kodu:

 Sub Print_To_PDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Public\ExcelWIKI\Martin Bookstore.pdf" End Sub 

⧭ Çıkış:

Bu kod PDF belgesini şu yola kaydedecektir C:\Users\Public\ExcelWIKI ismiyle bilgisayarımda Martin Bookstore.pdf .

Daha fazlasını okuyun: Excel'de Seçili Alan Nasıl Yazdırılır (2 Örnek)

Benzer Okumalar:

• Excel'de Başlıklar Nasıl Yazdırılır (5 Kolay Yol)
• Excel'de Çalışma Sayfasını Yorumlarla Yazdırma (5 Kolay Yol)
• Excel'de Seçili Hücreler Nasıl Yazdırılır (2 Kolay Yol)
• Excel'de Yazdırma Alanını Ortalayın (4 Yol)
• Excel VBA ile Baskı Önizleme Nasıl Görüntülenir (3 Makro)

Örnek 3: Excel VBA'da PDF'ye Yazdırma ve Yayınladıktan Sonra Dosyayı Açma

Şimdi belgeyi PDF olarak yazdıracağız, böylece dosya yayınlandıktan sonra açılacak. OpenAfterPublish parametresine Doğru .

Yani VBA kod olacak,

⧭ VBA Kodu:

 Sub Print_To_PDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Public\ExcelWIKI\Martin Bookstore.pdf", _ OpenAfterPublish:=True End Sub 

⧭ Çıkış:

Bu kod PDF belgesini şu yola kaydedecektir C:\Users\Public\ExcelWIKI ismiyle bilgisayarımda Martin Bookstore.pdf ve yayınlanır yayınlanmaz dosyayı açın.

İlgili İçerik: Excel'de Baskı Önizleme Nasıl Ayarlanır (6 Seçenek)

Örnek 4: Excel VBA'da Birden Çok Çalışma Sayfasını Birden Çok PDF Dosyasına Yazdırma

Şimdiye kadar tek bir çalışma sayfası yazdırdık. Bu sefer birden fazla çalışma sayfasını birden fazla PDF dosyasına yazdıracağız.

Burada bir çalışma kitabımız var 5 Her biri belirli bir kitapçının kitap kaydını içeren çalışma sayfaları.

Bu kez tüm çalışma sayfalarını PDF dosyalarına dönüştüreceğiz.

Bu VBA kod olacak:

⧭ VBA Kodu:

 Sub Print_Multiple_Sheets_To_PDF() Sheet_Names = InputBox("PDF'ye Yazdırılacak Çalışma Sayfalarının Adlarını Girin: ") Sheet_Names = Split(Sheet_Names, ", ") For i = LBound(Sheet_Names) To UBound(Sheet_Names) Worksheets(Sheet_Names(i)).ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Public\ExcelWIKI\" + Sheet_Names(i) + ".pdf" Next i EndAlt 

⧭ Çıkış:

Kodu çalıştırın. Bir giriş kutusu sizden PDF'ye dönüştürülecek çalışma sayfalarının adlarını girmenizi isteyecektir. Joseph Bookstore, Morgan Bookstore, Angela Bookstore .

Tıklayın TAMAM. . Ve bunları PDF dosyaları olarak klasöre kaydedecektir C:\Users\Public\ExcelWIKI .

Daha fazlasını okuyun: Excel'de Birden Fazla Sayfa Nasıl Yazdırılır (7 Farklı Yöntem)

Örnek 5: Excel VBA'da PDF Dosyasına Yazdırmak için Kullanıcı Tanımlı Bir İşlev Geliştirme

Son olarak, Excel ile herhangi bir çalışma sayfasını PDF'ye yazdırmak için kullanıcı tanımlı bir işlevi nasıl geliştirebileceğinizi göstereceğim VBA .

Adında bir fonksiyon geliştirelim PrintToPDF etkin çalışma sayfasını bir PDF dosyasına yazdıracaktır.

Bu VBA kod olacak:

⧭ VBA Kodu:

 Function PrintToPDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Public\ExcelWIKI\Martin Bookstore.pdf" End Function 

⧭ Çıkış:

Bu işlevi çalışma sayfanızın herhangi bir hücresine girin.

Sonra tıklayın GİRİŞ . Etkin sayfayı ( Martin Kitabevi burada) belirtilen klasördeki bir PDF dosyasına aktarın.

Daha fazlasını okuyun: Excel VBA: UserForm'u Sayfaya Sığacak Şekilde Yazdırma (2 Yöntem)

Hatırlanması Gerekenler

Kodları geliştirirken, çoğu zaman ActiveSheet nesnesi VBA Etkin çalışma kitabında o anda etkin olan çalışma sayfasını döndürür.

Ayrıca bazen mülkü kullandık ActiveSheet.Name Etkin çalışma sayfasının adını döndürür.

Sonuç

Bu, herhangi bir çalışma sayfasını PDF'ye yazdırmanın yoludur VBA Herhangi bir sorunuz var mı? Bize sormaktan çekinmeyin. Ve sitemizi ziyaret etmeyi unutmayın ExcelWIKI daha fazla gönderi ve güncelleme için.