Webden sayfa kaynak kodu excele nasıl alınır

[yavuzoz]

bayağı kullanışlı olmuş üstad sağolasın...

 

[assenucler]

Değerli Üstatlar;

Emek ve paylaşımlarınız için teşekkürler.

Veriler 5 dakika arayla alınmak istendiğinde, kodun hangi kısmında, ne şekilde değişiklik yapmak gerekiyor?

Sayın Zeki Gürsoy, Sayın netzone ve Sayın Haluk'un kod ve dosyaları, ben de sorunsuz çalıştı.

 

[Haluk]

Değerli Üstatlar;

......
Veriler 5 dakika arayla alınmak istendiğinde, kodun hangi kısmında, ne şekilde değişiklik yapmak gerekiyor?
.....

Bunun için, aşağıdaki satırda kırmızı ile belirtilen değişikliklerin yapılması yeterlidir.

    RunWhen = Now + TimeSerial(0, 5, 0)

.

 

[netzone]

...
Veriler 5 dakika arayla alınmak istendiğinde, kodun hangi kısmında, ne şekilde değişiklik yapmak gerekiyor?
...

Merhaba

Zeki Bey'in kodlarında Kırmızı ile belirtilen yeri değiştirin.

...
        'Otomatik güncelleme için aşağıdaki satıra dakika
        'cinsinden değer yazın...
        .RefreshPeriod = 0
..

Haluk Bey cevabını vermiş .

Ve benim eklediğim dosyada süre vermek için:


iyi çalışmalar.

 

[Haluk]

İlave bilgi:

Kodlarda aşağıda kırmızı ile belirtilen ufak bir ilave yaptım, şimdi daha iyi oldu ....

            For i = 1 To noRows
                For j = 2 To noColumns + 1
                    Temp = Replace(myTable.Rows(i - 1).Cells(j - 2).innerText, ".", "")
                    Cells(i, j) = Replace(Temp, ",", ".")
                    Temp = ""
                Next
            Next

 

[assenucler]

Değerli üstatlarımız,


Hepimizin yardımına en kısa sürede koşuyorlar. Allah sizlerden razı ve her şey gönlünüzce olsun.

Sevgi ve saygılar.

 

[Haluk]

Tekrar merhaba;

Doğrusu bugün piyasaları takip ederken insanın başı dönüyor......

Daha önceki dosyama bir ilave yaptım. Aşağıdaki animasyonda da görüldüğü gibi; veriler 5 saniye aralıklarla güncellenirken, yeni alınan değerlerin bir öncekine göre artış veya azalış yönünde olup olmadığı, kırmızı ve yeşil oklarla belirtilmektedir. Güncellenen veride değişiklik yoksa, "----" ile belirtilmektedir.

Bu revizyonu içeren dosya da ektedir.

Umarım döviz makul bir seviyeye iner artık....

 

[assenucler]

Sayın Haluk,

Yeni paylaşımınız için teşekkürler.

Böyle giderse vay ekonomi ve vatandaşın haline!