• Foruma hoş geldin 👋 Ziyaretçi

    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 tamamen ücretsizdir.

Soru verilerin bazılarını çekiyor bazılarını çekmiyor

Kokorecci

Yeni Üye
Katılım
16 Nis 2021
Mesajlar
471
Aldığı beğeni
65
Excel V
Office 2016 TR
merhabalar siteden veri çeken bir dosyam var vakat o sitedeki aynı sayfada olan verilerin bazılarını çekiyor bazılarını çekmiyor
veri çekme işinde bir usta yardımcı olabilirmi dosya örnekde webden veri al dediğimde o site acılıor data sayfasını sitedeki sol tarafdaki verileri getiriyor fakat sitedeki sağ tarafdaki veriler gelmiyor bu konuda yardımcı olursanız sevınırım
 

Ekli dosyalar

Deneyin.

Kod:
Sub deneme()
Dim ie As Object, tdEleman As Object
Set ie = CreateObject("internetexplorer.application")
ie.navigate "https://arsiv.mackolik.com/Mac/3699040/Malmo-FF-F91-Diddeleng#karsilastirma"

Do While ie.busy: DoEvents: Loop
Do While Not ie.readyState = 4: DoEvents: Loop
For Each tdEleman In ie.document.getElementsByTagName("div")
If tdEleman.ID = "compare-left-coll" Then
   Range("a65536").End(3)(2, 1) = tdEleman.innerText
End If
Next
ie.Quit
Set ie = Nothing

End Sub
 
Geri
Üst