Sitemize Hoşgeldiniz

Türkiye'nin en geniş özeliklere sahip forumu olan ExcelDestek.Com üzerinde soru sorabilmek, daha önceki sorulan sorulara, açılan konulara cevap yazabilmek, puan kazanabilmek, kazandığınız puanlar ile dosya indirebilmek ve çok daha fazla özellikten yararlanabilmek için sitemize üye olunuz.
Hemen Üye Ol ya da Giriş Yap

Sorun Cevaplayalım

Excel'e dair sorularınızı sorun, cevaplayalım.

Çözümlenmiş Sorular

Kullanıcılarımızın sorularını ve sunduğumuz çözümleri inceleyin.

Destek Ekibimiz Sizlerle

Ücretli destek ve özel hizmet talep edebilirsiniz.

  • Web sitemizi "REKLAMSIZ" olarak ziyaret etmek ister misiniz?
    Gerek sitemize destek, gerekse de reklam görmeden sitemizde gezinmek isterseniz, HESAP YÜKSELTME sayfasından SADECE 15-TL'ye 1 yıl boyunca ÜCRETLİ ÜYELİK almanız yeterli olacaktır.
    Detaylı bilgilendirme için lütfen buraya tıklayınız!

Genel Excel Makrolar Soru Makro ile tüm sayfaları tek pdf ve her sayfayı ayrı ayrı pdf yapmak

Selimileri0623

Yeni Üye
Kullanıcı
Katılım
16 Ağu 2019
Mesajlar
36
Excel Versiyonu, Dili
Excel 2016 TR

Reputation:

Merhaba
elimdeki kodu bir excel dosyasına uygulayabilecek var mı?

Kod bir excel çalışma kitapçığı tüm sayfa sırası sırası ile tek pdf yapıyor ve aynı zamanda ayrı ayrı sayfaları da ayrı ayrı pdf yapıyor

kayıt yeri: Masaüstü TASLAK klasörü olacak şekilde

kodu paylaşıyorum

Sub KOD_PDF()
Application.ScreenUpdating = False
On Error Resume Next
Yol = Environ("USERPROFILE") & "\Desktop\PDFKLASÖRÜ\"
For i = 2 To Sheets.Count
Sheets(i).Select
isim = [a3]

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
Yol & "/" & isim & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True
Next i
Application.ScreenUpdating = True
End Sub
 

Selimileri0623

Yeni Üye
Kullanıcı
Katılım
16 Ağu 2019
Mesajlar
36
Excel Versiyonu, Dili
Excel 2016 TR

Reputation:

Sayın @Feyzullah Bey verdiğiniz kod sorunsuz çalıştı tüm sayfaları ayrı ayrı pdf yapıyor sorun yok . Ama tum sayfalari birlestirip tek pdf yapmıyor bu noktada da yardımcı olabilir mısınız
 

Feyzullah

XD Yönetim
Yönetici
Site Yöneticisi
SMS Onaylı
Katılım
1 Eki 2018
Mesajlar
779
Web Sitesi
www.exceldepo.com
Excel Versiyonu, Dili
Excel 2016 TR

Reputation:

Ama tum sayfalari birlestirip tek pdf yapmıyor bu noktada da yardımcı olabilir mısınız
Hocam konu başlığında yazdığınız gibi "her sayfayı ayrı ayrı pdf yapmak" paylaşmış olduğunuz kod sadece bu işlemi yapar.

Tüm Sayfaları tek Sayfa PDF dosyası olarak kaydetmek için faklı kod kullanmak gerekiyor. Son sorunuz ile bilgisi olan ve/veya uzman arkadaşlardan ilgilenen olmazsa müsait olduğumda ilgili kodu yazar paylaşırım. İyi çalışmalar.
 

Selimileri0623

Yeni Üye
Kullanıcı
Katılım
16 Ağu 2019
Mesajlar
36
Excel Versiyonu, Dili
Excel 2016 TR

Reputation:

Hocam konu başlığında yazdığınız gibi "her sayfayı ayrı ayrı pdf yapmak" paylaşmış olduğunuz kod sadece bu işlemi yapar.

Tüm Sayfaları tek Sayfa PDF dosyası olarak kaydetmek için faklı kod kullanmak gerekiyor. Son sorunuz ile bilgisi olan ve/veya uzman arkadaşlardan ilgilenen olmazsa müsait olduğumda ilgili kodu yazar paylaşırım. İyi çalışmalar.
Sayın @Feyzullah Bey ilginize teşekkür ederim. Eğer müsait olursanız ve bakma imanınız olursa çok sevinirim. İmkanınız olmazsa da canınız sağ olsun ilgilendiniz ya bu bile gönlünüzün yüceliğini gösterir
Selametle....
 
Üst