Bu dosya, Garanti Bankasının web sitesinden iç ve dış piyasa verilerini Excel sayfasına aktarmanızı sağlar. Veriler VBA makrosuyla çekilir ve tek sayfada iki ayrı tabloda listelenir.
Kodları incelemeniz ve benzer sorgular yapmanız için referans temennisiyle.
Kodları incelemeniz ve benzer sorgular yapmanız için referans temennisiyle.
Dosyanın içeriği
Dosya tek sayfadan oluşur: Sheet1.- İç Piyasalar (B-E sütunları): "Son Değer" ve "En Son" başlıkları altında BIST 100, USD, EURO, GBP, Altın, O/N Repo, Bilesik Faiz ve Cumhuriyet Altını gibi kalemler yer alır.
- Dış Piyasalar (I-L sütunları): Aynı düzende "Son Value" yerine "Son Değer" ve "En Son" (tarih ve saat) bilgileri listelenir.
- Veriler 5. satırdan başlayarak aşağı doğru yazılır.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Dosyada üç modül ve üç makro vardır:- GetData (Module3): Diğer iki makroyu sırayla çalıştırır. Güncelleme için bunu kullanmanız yeterlidir.
- GetData_IcPiyasalar (Module1): Önce B5:E100 aralığını temizler, sonra Garanti'nin icpiyasa.asp adresindeki XML verisini MSXML2.DOMDocument ile okur. Her STOCK düğümünü B-E sütunlarına yazar; sayılardaki noktaları kaldırıp sayıya çevirir.
- GetData_DisPiyasalar (Module2): Önce I5:L100 aralığını temizler, sonra dispiyasa.asp adresindeki XML verisini okuyup I-L sütunlarına yazar. J ve K sütunlarındaki değerleri CDec ile sayıya dönüştürür.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Geliştirici sekmesinden Makrolar penceresini açın (Alt+F8).
- GetData makrosunu seçip Çalıştır'a tıklayın.
- İç ve dış piyasa verileri Sheet1 sayfasında güncellenir. Yeni veri için makroyu tekrar çalıştırın.