tcmb döviz kurları

[szgnblt]

tcmb

office2003 ile hazırladım. vba iyi bilen arkadaşlardan ricam bunu excelde değilde exe olarak direk çalıştırmak. yani MonthView1_DblClick() kodunu inceleyip MonthView basınca o tarihin url olarak "http://www.tcmb.gov.tr/kurlar/"&"yyyy"&"mm"&"/"&"dd"&"mm"&"yyyy"&".html"

şeklinde almasını sağlamak sayfa1 a5 hücresindeki köprüyü almadan makroda bu köprülemeyi yapmak için kod arıyorum.

excel tüm şifreleri "-" tire dir. yeni kodlamaya başlayan arkadaşlarda örnek niteliğinde kullanabilirler.

 

[Korhan Ayhan]

Selamlar,

Forumda daha önce hazırlanan döviz ile ilgili çalışmaları incelermisiniz.

http://www.excel.web.tr/search.php?searchid=1139314

 

[szgnblt]

Selamlar,

Forumda daha önce hazırlanan döviz ile ilgili çalışmaları incelermisiniz.

http://www.excel.web.tr/search.php?searchid=1139314

sayın korhan bey
dikkat ederseniz ben tasarladığım programı kullanıcılara sundum. şuan bu programımdan memnunum. benim sorduğum şey excelden bunu kaldırıp vbasic ile yapabilmem için çeşitli proje ve kodların bilen arkadaşlardan istemiş bulunuyorum. teşekkür ederim

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu kullanabilirsiniz.

Private Sub MonthView1_DblClick()
    On Error GoTo 1
        Gün = Format(MonthView1.Value, "dd")
        Ay = Format(MonthView1.Value, "mm")
        Yıl = Format(MonthView1.Value, "yyyy")
        Url_Adres = "[URL]http://www.tcmb.gov.tr/kurlar/[/URL]" & Yıl & Ay & "/" & Gün & Ay & Yıl & ".html"
        ActiveWorkbook.FollowHyperlink Address:=Url_Adres, NewWindow:=True
    Exit Sub
1:
MsgBox "Resmi tatil, hafta sonu ve yarım iş günü çalışılan günlerde gösterge niteliginde kur bilgisi yayımlanmamaktadır."
End Sub

 

[szgnblt]

çok teşekkür ederim artık excel sayfasından bağımsız çalışmaktayım