• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

Çözüldü Klasör içindeki PDF dosyalarını seçerek birleştirme

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

DataMaestro

Yeni Üye
Katılım
25 Nis 2021
Mesajlar
210
Çözümler
3
Aldığı beğeni
96
Excel V
Office 2019 TR
Konu Sahibi
Sayın Formdaş arkadaşlar,

Ekteki çalışma ile bir klasörde bulunan, Excel dosyalarını seçerek PDF fotmatına çevirerek kayıt edebiliyorum.
Yapmak istediğim ve bir türlü yapamadığım, aşağıdaki konu hakkında yardımlarınıza ihtiyacım var.
Bir klasör içerisinde arşiv amaçlı tutulan yüzlerce PDF dosyası bulunmaktadır.
Klasör içerisinden çoklu PDF dosyası seçerek ve bunları birleştirerek, tek bir PDF dosyası olarak kayıt etmek istiyorum.
Birleştirilen PDF dosyası ismini "D5" ve "D6" hücresinden "25.04.2021 - Günlük Raporlar" şeklinde almalıdır.
Bu senaryoyu gerçekleştirmek için mevcut çalışmadaki kodu nasıl revize etmeliyim.
Benim içim çok değerli olan yardımlarınızı rica ediyorum.

Saygılarımla,
 
Çözüm
Sayın @Omerullah hoşgeldiniz.
Bilgisayarınızda Adobe acrobat kurulu olmalı.
VBA penceresinden Tools>References sekmesinden acrobatla ilgili bileşenleri aktif edin.
Dosyanızda B sütununa bilgileri girip birleştir butonuna basınız.
Dosyanız ektedir.
1619480054434.png
1619480224676.png
Sayın @Omerullah hoşgeldiniz.
Bilgisayarınızda Adobe acrobat kurulu olmalı.
VBA penceresinden Tools>References sekmesinden acrobatla ilgili bileşenleri aktif edin.
Dosyanızda B sütununa bilgileri girip birleştir butonuna basınız.
Dosyanız ektedir.
1619480054434.png
1619480224676.png
 
Çözüm
Konu Sahibi
Sayın @Omerullah hoşgeldiniz.
Bilgisayarınızda Adobe acrobat kurulu olmalı.
VBA penceresinden Tools>References sekmesinden acrobatla ilgili bileşenleri aktif edin.
Dosyanızda B sütununa bilgileri girip birleştir butonuna basınız.
Dosyanız ektedir.
Ekli dosyayı görüntüle 1048
Ekli dosyayı görüntüle 1049

Günaydın Sayın Balta,

Sanırım bu çalışma Excel uzantılı dosyalar için tasarlanmış.
PDF'lerin bulunduğu klasörd PDF'leri göremiyorum.
Filt = "Excel Files (*.xls*),*.xls*" satırını Filt = "Excel Files (*.pdf*),*.pdf*" şeklinde değiştirince ise oluşturulan PDF dosyasının içeriği bozuluyor.

Saygılarımla,
 
Bahsettiğiniz kodlar dosyanızda mevcut olan ve excelden pdf yapan kodlar sanırım.
Benim verdiğim kod (pdf birleştir butonu) işinizi görmedi mi?
 
Bende düzgün çalışıyor.
ss=. daki noktayı silip
SS satırını with bloğunun üstüne taşıyıp dener misiniz.
 
Hatalı hali ile dosyayı paylaşırmısınız
 
Bende sorunsuz çalışıyor ama
bir de böyle deneyin.
 
#2 nolu mesajda belirtmiştim.
Bilgisayarınızda Adobe acrobat kurulu olmalı.
VBA penceresinden Tools>References sekmesinden acrobatla ilgili bileşenleri aktif edin.
 
Konu Sahibi
Adobe kurulu söylediğiniz References penceresinden bileşenler aktif durumda.
En son aşağıdaki hatayı alıyorum.
AcroApp.Exit satırını işaret etmektedir.

1619534350081.png
 
Bende gayet düzgün çalışıyor.
Acrobat programınızla ilgili bir sorun olabilir.
1619534819215.png
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst