DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Lisanslı Adobe Acrobat varsa yapabilirsiniz, başka türlü olmaz...Merhaba Deneme yaptım ama tam istediğim bu değil
Yapmak istediğim PDF sayfasında ölçüm sonucu var.Buda 6 satırdan oluşuyor ve bu sonuçları macro ile excel de isteğim hücreye almak. Anlatabilmi mi ? bilmiyorum.
İlginize teşekkürler.
Örnek birkaç pdf dosyası ve almak istediğiniz bölüm leri bildirirseniz deneme yapmak isterim.Merhaba Arkadaşlar;
PDF dosyayı macro ile excel atmak ve PDF dosyasındaki belli bir hücredeki bilgiyi ( her PDF dosyasında aynı yerde ) excel 'e nasıl alırım.
yardımcı olacak arkadaşlara şimdiden teşekkürler.
Ekteki exe yi bir deneyin. Pdfleri klasörün içine atın, çalışacak mı sonucu bildirirseniz sevinirim, txt dosyası oluşacak.Merhaba,
Dosyalar aynı çalışmanın sonuçları. Ad soyad, no, cinsiyet ve numara alınacak. Numara, birinde 96, diğerinde 98. satırda. 100 örneğin % 70 inde karmaşa var.
Size kolay gelsin
Saygılarımla
Sub txtDenOku()
Cells.ClearContents
Const adReadLine = -2&
With CreateObject("ADODB.Stream")
.Charset = "utf-8"
.Open
.LoadFromFile ThisWorkbook.Path & "\veyselEMRE.txt"
Do Until .EOs
sat = sat + 1
Cells(sat, 1).Resize(, 2).Value = Split(.ReadText(adReadLine), ":")
Loop
.Close
End With
End Sub
Hata vermesi normal, çünkü exe önceki dosyaya göre dizayn edildi. Soruyu sorarken bu örnekleri de ekleseydiniz, ona göre bir çözüm düşünülürdü.Merhaba Sayın Veysel Hocam,
Önceki örneğe uygun dosyaların 43 tanesini anında çok düzgün biçimde açtı. Ekli örneklerin olduğu durumda Dene.jpg te görülen hatayı verdi.
Saygılarımla
örnek dosyaSayın Hocam,
34. dosyada aynı hatayı verip durdu.
Saygılarımla