• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Son Satırdaki veriyi alma

  • Konbuyu başlatan Konbuyu başlatan Kusta
  • Başlangıç tarihi Başlangıç tarihi
Katılım
30 Kasım 2018
Mesajlar
94
Excel Vers. ve Dili
2016
Merhabalar,
Web 'den aşağıdaki formülle bir tablodan veri alıyorum. Bu formülle en üst satırın yani 1. satırın 8. sütunundaki veriyi alıyorum. Ben son satırdan veri almak istesem bunu nasıl yapabilirim. Fakat bazı sorgulamalarda 3 satır bazılarında 5 satır olarak veri geliyor. Satır sayısı değişkenlik gösteriyor. (tablo_data.Item(1)) bunu değişmem lazım heralde ama ne yazmam gerekiyor bilemedim.
Yardımcı olabilirmisiniz.

Set webpage = IE.Document
Set tablo = webpage.getElementsByTagName("Table")(4) 'Sizin tablo numaranız
Set tablo_data = tablo.getElementsByTagName("tr")

Cells(i, 4) = tablo_data.Item(1).Children(8).innerText
 
Webden veri almayı bilmiyorum ama mantıken tablo_data.Item(item.count) ya da tabo_data.Item(ubound(tablo_data)) gibi bir dizilim olmalı.
 
Konu hakkında yardımlarınızı bekliyorum.
 
Merhaba,

Dosyanızı tam göremediğimden,

Aşağıdaki iki seçeneği de dener misiniz.

Kod:
Cells(i, 4) = tablo_data.Item(tablo_data.Lenght - 1).Children(8).innerText

yada

Cells(i, 4) = tablo_data.Item(tablo.Lenght - 1).Children(8).innerText
 
Geri
Üst