excel'e maliyetbuldan veri çekme! nasıl yapılır.

[amidli]

excel'e nette bulunan yenilenebilir tabloyu aktarmak ! nasıl yapılır.

excel http://www.maliyetbul.com/ha09-12-Fiyat-farki-icin-TUIK-endeksleri.php adresinden tuik endekslerini çekmek istiyorum.exceli açtığımda otomik olark güncellensin istyorum.ancak bi turlü veriyi çekemedim.excelde oluru var mı bunun.yardımcı olursaınız sewiirim.
dış veri al dediğiilmde tabloyu almıyor ...netten kopyalayıp yapıştırdığımda yenilenebilir veri oluşturmuyor..

 

[amidli]

hala değerli adminlerimizden cewap bekliyorum.

 

[amidli]

arkadaşlar php uzantılı sitelerrde veriyi excele alamıyormuyuz?

 

[Zeki Gürsoy]

Dosyayı test edin, verilerin gelmesi biraz uzun sürebilir.

Sub PHP_den_Al()
Dim i As Integer, j As Integer

Range("a:j").ClearContents

Const URL As String = _
"http://www.maliyetbul.com/ha09-12-Fiyat-farki-icin-TUIK-endeksleri.php"

    Set IE = CreateObject("InternetExplorer.Application")
    
    IE.Navigate URL
    
    Do Until IE.ReadyState = 4: DoEvents: Loop
    Do While IE.Busy: DoEvents: Loop
   
   'Başlıklar...
   
   On Error Resume Next
   
    With IE.Document.GetElementsByTagName("table").Item(2)
    
        For i = 1 To .Rows.Length - 1

            For j = 0 To .Rows(1).Cells.Length - 1

                Cells(i, j + 1) = .Rows(i).Cells(j).innertext

            Next

        Next

    End With
    
    'Veriler...
    With IE.Document.GetElementsByTagName("table").Item(3)
    
        For i = 1 To .Rows.Length - 1

            For j = 0 To .Rows(1).Cells.Length - 1

                Cells(i + 2, j + 1) = .Rows(i).Cells(j).innertext

            Next

        Next

    End With
    
    IE.Quit: Set IE = Nothing: MsgBox "Bitti", vbInformation
End Sub

 

[amidli]

zeki bey oncelikle ilgilendiğiniz i.in tşkler...ancak yenile denildiğinde hata veriyor... 2010 ve 2003 excel de hata verdi ama 2007 excel de oldu.

 

[amidli]

zeki hocamız sorunumu halletti. sorunumuz explorer sürümünden kaynaklanıyomuş.bende hallettik ama internet explorer 9 olan arkadaşlarda sadece başlıkları alıyor.tablo degerlerini almıyor.

 

[Zeki Gürsoy]

zeki hocamız sorunumu halletti. sorunumuz explorer sürümünden kaynaklanıyomuş.bende hallettik ama internet explorer 9 olan arkadaşlarda sadece başlıkları alıyor.tablo degerlerini almıyor.

Eski tarayıcılarla uyumluluk sorunu. Bunu aşmak için resimde kırmızı daire içindeki butonu tıklayın. Sonraki açılışlarda görüntülenecektir.

Registry anahtarı bilinirse tarayıcı versiyonuna göre bu ayar otomatik yapılabilir.

Resim :

 

[uzmanamele]

Merhaba

Zeki bey, sizin kodları kullanarak fiyat farkı hesabı için bir dosya hazırlamıştım.
Explorer9 için sorun çıkarıyordu. Belirttiğiniz şekilde Uyumluluk modu ayarını değiştirince sorunsuz çalıştı, teşekkür ederim.

yapım işlerinde fiyat farkı hesabı

 

[Zeki Gürsoy]

Rica ederim, kolay gelsin.

Son olarak merak ettiğim bir konu daha....
Şu an mevcut olan IE9 ve veri alımı çok hızlı. Sunucudan kaynaklı olup olmadığını merak ediyorum. IE6 ile test edip süreyi bildirirseniz memnun olurum.

 

[uzmanamele]

Merhaba

IE9, IE8 den daha hızlı, alt versiyonları denemedim.