Klasör İçindeki PDF Belgelerini Toplu Yazdırma

[NADIRYILDIZ]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

arkadaşlar merhaba
uygulanabilirliği varmı bilmiyorum ancak yapmak istediklerimi anlatayım

dökülecekler klasörünün içinde 3 adet daha klasör var
1-gelen pdf dosyaları
2-yazdırılan pdf dosyaları
3-yazdırılacak pdf dosyaları

sistemden aldığımız çok sayıda faturayı gelen pdf klasörünün içine indiriyoruz.
burada yapmak istediğim.
gelen pdf dosyalarını toplu yazdırmak istiyorum ancak aşağıdaki gibi bir yol izlemek mümkün mü
1-gelen pdf dosyasındakileri yazdırılacak pdf dosyaları klasörüne aktarmak.
ancak aktarılanları gelen pdf dosyasından silinmesini istemiyorum.burada kalacaklar

2-yazdırılacak klasöründeki pdf dosyalarını makro ile toplu olarak yazdırmak

3-yazdırılacak pdf dosyalarında yazdırılmış olanlarıda yazdırılan pdf dosyaları klasörüne aktarmak istiyorum.aktarılanların silinmesi

yani kısacası çok sayıda faturayı gelenden yazdırılacağa aktarıp yazdırmak yazdırılacaktakileri yazdırıldıktan sonra yazdırılanlar klasörüne aktarmak.gelen pdf klasöründekiler ise kalacak aktarımla birlikte silinmeyecek

teşekkürler

iyi çalışmalar

 

Bir pencere yardımıyla değişken olan aralığa veri çağırma

Dosya yolu Hk.

[NADIRYILDIZ]

sorduğum sorunun uygulanabilirliği varmıdır

 

[Ömer BARAN]

Muhtemelen olur, bilgisayarda değilim.

 

[NADIRYILDIZ]

üstad müsait olduğunuzda zaman ayırırsanız memnun olurum

teşekkürler

 

[Ömer BARAN]

Tekrar merhabalar @NADIRYILDIZ

GELEN klasöründekilerin tümünü tek adımda mı yazdırmak ve kopyalamak istiyorsunuz,
yoksa GÖZAT gibi bir ekranda pdf dosyasını seçerek mi?

 

[NADIRYILDIZ]

Ömer bey

haftalık olarak ft ları gelen klasörüne indiriyoruz.
örneğin 01.01.2021 ile 07.01.2021 tarihleri arasındaki indiriyoruz.
ertesi hafta bu sefer 01.01.21 ile 15.01.2021 arasındaki indiriyoruz.
aynı olanları atla diyerek bu klasöre indiriyoruz.bu böyle devam ediyor.

burada istediğim
daha önce yazdırılmayan ftlar hangisi ise bunları yazdırılacak ft klasörüne alarak yazdırılacak ft klasörü üzerinden yazdırmak
yazılan ft larıda yazılanlar klasörüne aktarmak
gelen klasörüne indirilen ft lar ben silmedikçe kalsın silinmesinki tamamını görüp takip edebileyim

gelen klasör sabit olup yazdırılmayanları yazılacak klasörüne aktarsın
yazdırılan ft larda yazdırılan klasörüne aktarım yapsın ki yazdırılmayanları takip edebiliyim

gözat gibi bir ekran ile uğraşmak değil direkt döküm alırsa daha iyi olur

teşekkürler

 

[Ömer BARAN]

Bu arada bilgisayarınızda Acrobat32.exe'nin tam konumu nedir onu yazın.

İşte diyorum ki;
-- GELEN dizini taranıp, YAZDIRILAN dizininde olmayanların TÜMÜ tek komutla yazdırılsa,
-- arada YAZDIRILACAK dizini hiç olmasa.
daha anlamlı değil mi?

Bence aradaki YAZDIRILACAK dizininin bir işlevi yok.
Sadece belge kopyalarının bulunduğu bir dizin olmaktan öte bir işlevi kalmıyor.
Bilgisayarda alan kaplamaktan başka bir şeye yaramıyor gibi görünüyor.

.

 

[NADIRYILDIZ]

üstad dediğiniz gibi yaparsanız daha mantıklı

"Bu arada bilgisayarınızda Acrobat32.exe'nin tam konumu nedir onu yazın."
demişsiniz kusura bakmayın burada ne istediğinizi anlayamadım.

 

[Ömer BARAN]

Neticede ACROBAT programı belgeleri açacak ve yazıcıya gönderecek.
Bunun için ACROBAT.EXE nin bulunduğu dizinin (yol) bilinmesi gerekiyor.

Mesela benim bilgisayarımdaki yol bilgisi şöyle:
"C:\Program Files\Adobe\Acrobat Reader DC\Reader\AcroRd32.exe"

Sizin bilgisayarınızdaki yol bilgisi nedir? Kodlamada gerekecek çünkü.

.

 

[NADIRYILDIZ]

C:\Program Files (x86)\Adobe\Acrobat DC\Acrobat

 

[Ömer BARAN]

Sonu exe mi yoksa exe olan bu klasörün içinde mi?
Acrobat.exe yi bulup sağ tıklayın ve özelliklere bakınca tam yolu görebilirsinuz.

 

[NADIRYILDIZ]

"C:\Program Files (x86)\Adobe\Acrobat DC\Acrobat\Acrobat.exe"

masa üstünde ömer bey klasörde değil

 

[Ömer BARAN]

Belge ekte Sayın @NADIRYILDIZ

Belgeyi, GELEN.... , YAZDIRILACAK..., YAZDIRILAN..... klasörlerinin içinde bulunduğu DÖKÜLECEKLER klasörüne kaydedin.
Kod GELEN klasöründe olup, YAZDIRILAN klasöründe olmayanları, yazıcıya gönderir ve bir kopyasını YAZDIRILAN dizinine kaydeder.

Koddaki;
-- pdfyol = ...... kısmının (masaüstünde gibi görsenizde Program Files dizinindeki gerçek YOL bilgisi),
-- tum = ..... kısmının (indirdiğiniz tüm PDF belgelerinin bulunduğu klasörün yol bilgisi),
-- eski = ...... kısmının (yazdırılan PDF belgelerinin bulunduğu klasörün yol bilgisi),
doğru yazıldığından emin olun.

İşlem bittiğinde ACROBAT penceresini bir kez kapatmanız gerekecek.

Oluşturulan kod aşağıda gösterilmiştir.

Görüntülemek için giriş yapmanız gerekmektedir.
(43 satır)

 

[NADIRYILDIZ]

Ömer bey ömncelikle teşekkür ediyorum.
dediklerinizi yaptım.
excel kaydettiğim dosyanın ekran görüntüsü ektedir.
ancak yazdır butonuna bastığımdaki ikaz veren ekran görüntüsünüde ektedir.
bir yerde yanlış yapıyorum ama nerede





iyi çalışmalar

 

[Ömer BARAN]

bu.ActiveSheet.Range("A2:A" & Rows.Count).ClearContents
olacaktı, yazarken hata yapmışım demekki.

 

[NADIRYILDIZ]

ömer bey bu mesajı veriyor
yazdırmıyor yazdırılanlar klasörüne aktarmıyor.

 

[Ömer BARAN]

YAZDIRILACAK dizini kullanılmıyor önce onu hatırlatayım.
TÜM klasöründe olup, YAZDIRILAN kasöründe olmayanlar yazıcıya gönderilir.

Koddaki YOL bilgilerinin doğru yazıldığından emin misiniz?

Tüm pdflerin bulunduğu klasörde olup, YAZDIRILAN klasöründe olmayan belge varsa
bu uyarıyı almazsınız (tüm pdfler yazdırılmış, yani YAZDIRILAN klasöründe olmayan belge yok demek).

YAZDIRILAN klasöründen birkaç belgeyi silin veya adlarını değiştirin. Kodu sonra tekrar çalıştırın.

 

[NADIRYILDIZ]

yol bilgilerini tam olarak kontrol edeyim o zaman ömer bey
ona göre size geri dönüş yaparım

iyi çalışmalar

 

[Ömer BARAN]

Gönderdiğim belge ve eklediğim kodda Acrobat...exe kısmındaki EXE dosyanın adı benim bilgisayırımda AcroRd32.exe idi.
Siz bence bunu da bir kontrol edin. Prograkın, ProgramFiles dizinindeki UYGULAMA EXE dosyasını bulup tam adına bakacaksınız.

Ayrıca işlem sonrasında 1 kez acrobat programını elle kapatmanız gerektiğini yazmıştım.
Kodun başındaki pdfyol = .... kısmındaki EXE neyse aynı adı kullanarak aşağıdaki kod satırına koyu renk yaptığım kısmı eklerseniz elle kapatmaya da gerek kalmaz.

Görüntülemek için giriş yapmanız gerekmektedir.
(1 satır)

.

 

[NADIRYILDIZ]

tamam ömer bey bakacağım.teşekkürler