Döviz Kuru Sorgulama

Bu dosya, Türkiye Cumhuriyet Merkez Bankası'nın yayımladığı kur bilgisini TCMBKurDegeri adlı kullanıcı tanımlı fonksiyon aracılığıyla Excel hücrelerine getirir. Fonksiyon, kurları https://www.tcmb.gov.tr/kurlar/today.xml adresinden okur.

Önemli: Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Ayrıca fonksiyonun çalışması için internet bağlantısı gerekir.

Dosyanın içeriği​

• Sheet1: G6:K21 aralığında örnek bir kur tablosu yer alır. J18 hücresinde "Satış" başlığı bulunur, I19 ve I20 hücrelerinde ise fonksiyonun EUR ve USD için örnek kullanımları vardır.

Kullanılan formüller​

• =TCMBKurDegeri(NOW(),"eur",1) (I19): Euro kurunu getirir.
• =TCMBKurDegeri(NOW(),"usd",1) (I20): Dolar kurunu getirir.
• ŞİMDİ (NOW): Tarih bilgisi olarak o anki tarih ve saati verir.

Fonksiyonun üç parametresi vardır: tarih, döviz kodu (eur, usd gibi) ve kur tipi. Kur tipi 1 ise Forex Buying (döviz alış), 2 ise Forex Selling (döviz satış), 3 ise Banknote Buying (efektif alış), 4 ise Banknote Selling (efektif satış) değeri döner.

Makrolar​

• Module1 / TCMBKurDegeri: MSXML2.XMLHTTP nesnesiyle yukarıdaki adrese GET isteği gönderir. Yanıt başarılıysa XML metnini döviz koduna göre ayırır, seçilen kur tipinin değerini alır ve ondalık ayracını noktadan virgüle çevirerek sonuç olarak verir. Hata olursa 0 döndürür.

Fonksiyon bir hücreden formülle çağrılır, ayrıca çalıştırılması gerekmez. Kodun yaptığı tek dış işlem, TCMB adresinden veri okumaktır. Dosya silme veya başka bir adrese bağlantı gibi işlem içermez.

Not: Kodda sabit olarak today.xml adresi kullanılır, yani fonksiyon her zaman TCMB'nin güncel günlük kurunu okur. Tarih parametresi adres oluşturmada kullanılmaz. Ondalık ayracı olarak nokta kullanıyorsanız, kod içindeki yorum satırında belirtilen iki satırı değiştirmeniz yeterlidir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Sheet1 sayfasında I19 ve I20 hücrelerindeki örnek formüllere bakın.
3. Kendi hücrenize =TCMBKurDegeri(NOW(),"usd",4) gibi bir formül yazın.
4. Döviz kodunu ve kur tipini ihtiyacınıza göre değiştirin.
5. Fonksiyonu başka bir dosyada kullanmak için Module1 kodunu o dosyaya kopyalayın.

İhtiyacı olanların faydalanması temennisiyle.