arkadaşlar yaptığım bir uygulamada http://www.tuik.gov.tr/PreIstatistikTablo.do?istab_id=274 sayfasındaki tabloda girdiğim tarih ile çakışan p sutunundaki değeri almam gerekiyor. yine siteden bulduğum ve girilen tarihe göre döviz değerlerini webden çeken kod üzerinde bazı değişiklikler yaptım ama
Temp = W.ResponseText
x1 = InStr(Temp, "USD")
x2 = WorksheetFunction.Trim(Mid(Temp, x1, 100))
If strYear > 1998 Then
y1 = InStr(Temp, "EUR")
y2 = WorksheetFunction.Trim(Mid(Temp, y1, 100))
End If
'[A25] = WorksheetFunction.Trim(x2)
RetVal1 = Split(x2, " ")
RetVal2 = Split(y2, " ")
kodunu anlayamadım.
http://www.tuik.gov.tr/PreIstatistikTablo.do?istab_id=274 linkindeki tablonun p(imalat) sütununda girdiğim tarih değerine göre karşılık gelen değeri nasıl çekerim.
kodun burası köşeye sıkıştırdı beni. bi yardımcı olursanız sevinirim.
iyi çalışmalar...
Temp = W.ResponseText
x1 = InStr(Temp, "USD")
x2 = WorksheetFunction.Trim(Mid(Temp, x1, 100))
If strYear > 1998 Then
y1 = InStr(Temp, "EUR")
y2 = WorksheetFunction.Trim(Mid(Temp, y1, 100))
End If
'[A25] = WorksheetFunction.Trim(x2)
RetVal1 = Split(x2, " ")
RetVal2 = Split(y2, " ")
kodunu anlayamadım.
http://www.tuik.gov.tr/PreIstatistikTablo.do?istab_id=274 linkindeki tablonun p(imalat) sütununda girdiğim tarih değerine göre karşılık gelen değeri nasıl çekerim.
kodun burası köşeye sıkıştırdı beni. bi yardımcı olursanız sevinirim.
iyi çalışmalar...