Sadece İstenilen Sayfaları PDF Yapmak

merakli · 9 Mar 2021

Hafızam beni yanıltmıyorsa @Ömer BARAN Bey forumdan bir arkadaşa verdiği cevaptan aşağıdaki şekilde kendime uyarlayıp excel dosyamdaki tüm sayfaları PDF e çeviriyorum.
Ancak tüm sayfaları değilde sadece istenilen sayfaları PDF formatına dönüştürmek için kodlarda nasıl bir değişiklik yapmam gerekiyor.

Excel dosyamızdaki Sayfalarımız şöyle olsun.

Rapor
5A
5B
6A
6B
6C
7A
7B
8A
8B
8C
8D
Öğretmen
Öğrenci
Veri
Program

Sadece Yeşil Renkle yazılmış excel sayfalarında yazdırma alanlarını PDF formatına çevirecek şekilde nasıl bir düzenleme yapmalıyız?

VBA:

İndirmek için giriş yapmanız gerekmektedir.
(8 satır)

Ömer BARAN · 9 Mar 2021

Merhabalar.

Şöyle deneyin.

VBA:

İndirmek için giriş yapmanız gerekmektedir.
(19 satır)

Ömer BARAN · 9 Mar 2021

Yalnız, sayfa yapılarını yatay/dikey, sığdırma ayarlarınız hazır olduktan sonra çalıştırın.

merakli · 9 Mar 2021

Ömer BARAN' Alıntı:
Merhabalar.

Şöyle deneyin.

VBA:

İndirmek için giriş yapmanız gerekmektedir. (19 satır)

Teşekkür ederim @Ömer BARAN Bey. PDF kaydedilmesini istemediğimiz sayfaları If XD.Name <> "Öğretmen" And XD.Name <> "Öğrenci" And XD.Name <> "Program" Then ile işlem dışı bırakmış oluyoruz.

Ömer BARAN · 9 Mar 2021

Aynen.

Ömer BARAN · 9 Mar 2021

Koddaki ActiveWorkbook.Sheets(XD.Name).Export...... kısmını bukitap.Sheets(XD.Name).Export.... diye değiştirirseniz daha doğru olur.

merakli · 9 Mar 2021

Ömer BARAN' Alıntı:
Merhabalar.

Şöyle deneyin.

VBA:

İndirmek için giriş yapmanız gerekmektedir. (19 satır)

Ömer bey bu şekilde de zaman zaman gerekli oluyor ancak biz genelde tek bir pdf dosyasında tüm sayfaların yer aldığı tek bir PDF dosyası ile kaydediyoruz.

Bunu Veri sayfasında J1 içindeki veriyi (8 - 12 Mart) başlık yaparak tek bir pdf içinde nasıl kaydederim

Ömer BARAN · 9 Mar 2021

O zaman şöyle.

VBA:

İndirmek için giriş yapmanız gerekmektedir.
(32 satır)

merakli · 9 Mar 2021

@Ömer BARAN Bey aşağıdaki satırda şu şekilde bir hata verdi

Ömer BARAN · 9 Mar 2021

Şöyle değiştirin.

VBA:

İndirmek için giriş yapmanız gerekmektedir.
(1 satır)

merakli · 9 Mar 2021

Ömer BARAN' Alıntı:
Şöyle değiştirin.

VBA:

İndirmek için giriş yapmanız gerekmektedir. (1 satır)

bir döngü olduğu yeni laptop olmasına rağmen bilgisayarı kasmasından belli oluyor ama herhangi bir dosya oluşturmuyor ve excel'i görev yöneticisinden kapatmak zorunda kalıyorum.

Ömer BARAN · 10 Mar 2021

Sayın @merakli .

Kodlarda bir döngü yok, sadece, belgedeki formül yoğunluğu nedeniyle sorun yaşamış olmanız muhtemel.
Bu sorunu da yaşamamanız açısından koda iki satır ekleyip, bir kod satırının yerini değiştirdim.
Sayfayı yenileyerek kod cevabımı tekrar gözden geçirin isterseniz.

İyi çalışmalar dilerim.

merakli · 10 Mar 2021

Ömer BARAN' Alıntı:
Sayın @merakli .

Kodlarda bir döngü yok, sadece, belgedeki formül yoğunluğu nedeniyle sorun yaşamış olmanız muhtemel.
Bu sorunu da yaşamamanız açısından koda iki satır ekleyip, bir kod satırının yerini değiştirdim.
Sayfayı yenileyerek kod cevabımı tekrar gözden geçirin isterseniz.

İyi çalışmalar dilerim.

Teşekkürler. Sorunsuz çalıştı.

daghan87 · 17 Mar 2022

bilginiz için teşekkürler hocam. sormak istediğim soru tek excel çalışma kitabı içerinse iki ayrı sayfa olarak düşünün. sayfa 1 içeriğindeki 1.sayfa ile sayfa 2 içeriğindeki 1 ve 2. sayfaları tek pdf şeklinde d klasörü içerisine sayfa 1 de örneğin al1 hücresinde yazan metin adı ile dosyayı nasıl kayıt yapabiliriz

	Sadece ISBN İçeren Kitap Listesini Tamamlama ExcelDepo 24 Eki 2023 Makro Soruları
	Sadece İlk Sayfada Üst Bilgi Oluşturma YasarPiskin 26 Tem 2022 Makro Soruları
	Makro ile Sadece Seçili Hücreleri Kopyalama AhmetRasim 26 Eyl 2024 Makro Soruları
	Textbox sadece tarih girişi hakkında AhmetRasim 26 Mar 2021 Makro Soruları
	Sadece Bazı Kapalı Kitaplarda Veri Alma Believing 15 Mar 2025 Makro Soruları