Klasördeki PDF Dosyalarından Veri Çekme

[PriveT]

Excel Versiyonu

Excel 365

Excel Sürümü

64 Bit

Excel Dili

Türkçe

Merhabalar,
1 klasörde PDF dosyalarım var.
Bu PDF dosyalarının doldurulabilir form bölümlerindeki bilgileri excele listeletecek bir makro rica ediyorum.
Ekte örnek olarak 1 adet PDF dosya ve hangi veri nereye aktarılacağıyla ilgili Excel tablom var.
Şimdiden teşekkürler.

 

Userform Nesnesini Dashboard Haline Getirme

Sütundaki Sayısal Değerleri Değerlendirip Değer Yazdırma

[Qene]

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

Hocam üstteki kodlar bana ait değil ama bir deneme şansınız var mı? Belki işe yarar.

 

[PriveT]

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

Hocam üstteki kodlar bana ait değil ama bir deneme şansınız var mı? Belki işe yarar.

Hemen kontrol edip döneyim.

 

[PriveT]

Aşağıdaki şekilde uyarı aldım.
Ayrıca alakası var mı bilmiyorum Dim fso satırı da seçili, işaretlenmiş durumda.

 

[halily]

Filesystemobject için referans eklemek gerekiyordu galiba

 

[cesur]

Bu kod ile pdf içindeki yazılara rahatlıkla ulaşabilirsiniz. Ancak pdf dosyasında yazdırılabilir alanlar içindeki bilgilere ulaşamazsınız. Bunun için adobe nin AcroExch yazılımına ihtiyaç var. bunu tek başına çalıştırmak zor. Bu nedenle Acrobat kuruluması gerekiyor( Reader dan bahsetmiyorum) Ancak o zaman mümkün oluyor

 

[PriveT]

Bu kod ile pdf içindeki yazılara rahatlıkla ulaşabilirsiniz. Ancak pdf dosyasında yazdırılabilir alanlar içindeki bilgilere ulaşamazsınız. Bunun için adobe nin AcroExch yazılımına ihtiyaç var. bunu tek başına çalıştırmak zor. Bu nedenle Acrobat kuruluması gerekiyor( Reader dan bahsetmiyorum) Ancak o zaman mümkün oluyor

Acrobat Pro var bilgisayarımda.

 

[cesur]

o halde ben de kurup denemelere başlayayım

 

[cesur]

bu kdu modulde çalıştırırmısınız. Tüm dosyalarda çalışıyor mu?

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

 

[cesur]

dosya yolunu değiştirmeyi unutmayın gülen adam kodu fso.OpenTextFile şeklindedir.

 

[cesur]

yine bozdu arada nokta var

 

[cesur]

gönderdiğiniz iki pdf dosyasında sorun yok. Gayet güzel çalışıyor.(xx.pdf ve pdf.pdf)

 

[PriveT]

yine bozdu arada nokta var

Ben kopyala yapıştır yapınca nokta değil de alt tireli çıkıyor. Yani boşluklar olmadan o _ O çıkıyor.
Bu şekilde de nokta ile de denedim. Aşağıdaki hatayı verdi.


Bir de doğru anladıysam kod tek dosya için hazırlanmış.
Sanırım ihtiyacımı tam anlatamadım.
Bir klasörde bir çok PDF var, (exceli kopyalacağım klasör varsayılan klasör olarak belirtilebilir). Excel dosyasını kopyalayacağım bu klasördeki bütün PDF'lerden örnek excel dosyasında belirtilen bütün veriler çekilip alt alta listelenecek.
Ekteki exceli güncelleyip 2. satırı da ekledim.
Şimdiden emekleriniz için teşekkürler.

 

[cesur]

yanlış gelmiş txt olarak göndereyim

 

[cesur]

@PriveT
buradan kopyalayıp yapıştırın

 

[PriveT]

@PriveT
buradan kopyalayıp yapıştırın

Yarın bilgisayar başına geçer geçmez bakayım. Teşekkürler

 

[cesur]

@PriveT
Deneyiniz .Klasör yolunu module1 içinden değiştirmeyi unutmayın. Pdf dosyalarının bulunduğu klasorun adresini yazacaksınız

 

[PriveT]

@PriveT
Deneyiniz .Klasör yolunu module1 içinden değiştirmeyi unutmayın. Pdf dosyalarının bulunduğu klasorun adresini yazacaksınız

Merhaba,
Denedim, aşağıdaki satırda hata verdi.
Excel versiyonundan falan kaynaklanabilir mi?

 

[cesur]

excel dosyasını pdf dosyalarının olduğu yerden farklı bir yere koyun. Sonra koda girin ve değiştirilecek yolu değiştirin. yolu pdf dosyaları klasörü üzerine sağ tıklayın özellikleri seçin ve adresi oradan kopyalayıp yapıştırın. Hepsi bu çalışması gerekiyor.Sonucu bekliyorum

KlasorAdi = "C:\Users\Adnan\Downloads\mesai\" bu şekle benzer olmalı

 

[cesur]

yolun alınmasında D: dan sonra boşluk olmamalı