Tarihe Göre Tcmb Döviz Kuru Alma

Tarihe Göre Tcmb Döviz Kuru Alma

  • Konuyu başlatan Konuyu başlatan PriveT
  • Başlangıç tarihi Başlangıç tarihi
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

PriveT

İlyas PINAROĞLU

Yönetici
Kullanıcı
Katılım
11 Mar 2019
Mesajlar
1,500
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Sayın Makro üstadlarım merhaba,
Forumumuzda henüz bulunmayan bir konu. Bir çok kişinin de işine yarayacağını düşünüyorum.

Belirtilecek tarihlere ait TCMB kurlarını çekecek bir KTF makrosu hazırlayabilir misiniz?

Çalışma prensibi şu şekilde olmasını istiyorum;
Herhangibir hücreye, hatta bir çok hücreye tarih yazacağız.
Örneğin A5 hücresine bir tarih yazdık.
Herhangibir hücreye =euro(A5) yazdığımızda o tarihin euro kurunu, =usd(A5) yazdığımızda o tarihin usd kurunu getirsin.

Şimdiden teşekkürler, kolay gelsin.
 
Çözüm
Merhabalar.

17 numaralı cevapta belirttiğim hususslar için iş başa düştü ve
konuyla ilgili olarak yeni bir KTF (UDF - Kullanıcı Tanımlı Fonksiyon) hazırladım.

KTF'nin kullanım şekli; Excel hücresine =TCMB_XD ( tarih ; para_cinsi ; kur_türü ) şeklinde formül yazılmasıdır.

-- Formüldeki değişkenler, başka bir hücreden alınabileceği gibi
ÇİFT TIRNAK arasında olacak şekilde doğrudan formül içerisine de yazılabilir.
-- İlgili yabancı para ismi; açılır listeden seçim yöntemiyle seçilebilir.
Burada da iki seçenek var; ilgili yabancı paranın açık/uzun adı veya 3 karakterli Döviz Kodu yazılabilir/seçilebilir.

Klasik kur çekme KTF'lerinden farklı olarak;
-- haftasonu, Milli Bayramlar/Dini Bayramlar vs...
Ktf ile yapılmış bir örnekte eklediğimi anımsıyorum.
Tek tek döviz ismi yerine =doviz(tarih, “cins”) şeklinde idi sanırım.
 
Formül olarak kullanılan biçiminde tarih olarak resmi tatil olmayan bir günün tarihini yazarak bir dener misiniz?
A1 hücresine 24.05.2019 gibi haftaiçi olan bir günün tarihini yazarsanız =WebDoviz(A1;B3;1) gibi yazılarak kullanılan formül hata vermez.
Formüldeki A1 yerine aşağıdaki formül parçasını yazarak, ilgili tarih haftasonu ise bundan önceki son cuma tarihinin kuru alınabilir
Kod:
İndirmek için giriş yapmanız gerekmektedir.
(1 satır)
 
Alternatif olsun, sayfa üzerinde parça al ile yapmış olduğum çalışma.
EURO
Kullanımı =euro(tarih)
VBA:
İndirmek için giriş yapmanız gerekmektedir.
(23 satır)

USD
Kullanımı =usd(tarih)
VBA:
İndirmek için giriş yapmanız gerekmektedir.
(23 satır)
Alternatif 3:
ullanımı =KurGetir(Tarih,Cinsi)
VBA:
İndirmek için giriş yapmanız gerekmektedir.
(31 satır)
 
Metehan hocam haftasonu ve tatillerde veri gelmiyor.Birde buna bir el atsanız.Bir önceki günü baz alınabilir.
 
Hafta sonu kodlar içeresinde halledilebilir ama resmi tatil günleri için yardımcı sütuna veya sayfaya ihtiyaç var.
 
12.nolu mesajda (benim 1.cevabım) ki kodlar güncellenmiştir. Hafta Sonu tarihleri için düzeltme yapılmıştır. Resmi tatiller için çalışma yapılacak. :)
 
Sayın @Feyzullah emeğinize sağlık.
Geçmişte ben de bir miktar ilgilenmiştim bu konuyla ama, zamanında net'ten bilgi çekme konusunda edindiğim tecrübe yeterli gelmemişti ve olay soğudu gitti.

Malumdur TC. Merkez Bankası sayfasında yabancı para kur bilgileriyle ilgili iki alan var;
-- Gösterge Niteliğindeki Merkez Bankası Kurları << İlgili Sayfa
USD, AUD, DKK, EUR, GBP, CHF, SEK, CAD, KWD, NOK, SAR, JPY, BGN, RON, RUB, IRR, CNY, PKR, QAR
-- Alım Satıma Konu Olmayan Dövizlere İlişkin Bilgi Amaçlı Kurlar << İlgili Sayfa
ARS, ALL, AZN, BHD, AED, BAM, BRL, CZK, IDR, PHP, ZAR, KRW, GEL, INR, HRK, HKD, IQD, ISK, KZT, QAR, HUF, MKD, MYR, MXN, EGP, UZS, PEN, PLN, SGD, SYP, THB, TMT, UAH, JOD, ILS, NZD

Madem bu işe el attınız; bence hücreye yazılacak formül şeklinde kullanımı olan KTF'de;
-- tarih kontrolü olacak (dini bayramları dahil etmek sıkıntılı olabilir ancak en azından milli bayram ve haftasonu kontrolü olabilir),
-- belirttiğim iki kaynakta bulunan yabancı para türlerinin tümünü içerecek
-- kur türünü (döviz/efektif alış/satış) de seçimli hale getirecek (tabi ilk grupta bazılarına ait iki, bazılarına ait 4, ikinci grupta ise 1 kur türü var)
-- bu KTF'de, tıpkı yerleşik işlevlerde olduğu gibi formül unsurları için ipucu-açıklama gibi eklemeler de olacak şekilde bir yapı oluştrursanız,
(bu konuda şurada örnek var >> wellsr.com/vba/2017/excel/vba-macrooptions-to-add-udf-description/)
EKLENTİ haline getirilip tüm belgelerde kullanmaya müsait bir KTF ortaya çıkartmış olursunuz ve tüm üyeler için çok faydalı olur diye düşünüyorum.
 
12.nolu mesajda (benim 1.cevabım) ki kodlar güncellenmiştir. Hafta Sonu tarihleri ve Resmi Tatil günleri için düzeltme yapılmıştır.
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt