Jos haluan hakea hexin sivuilta tietyn osakkeen kurssin päivittäin ja ottaa tuon datan talteen niin että voin laskea liukuvan keskiarvon vaikka 20 päivälle niin miten teen sen? Datan haku onnistuu mutta miten isosta data-taulukosta poimitaan osakkeen nimen avulla sen kurssi? Entä miten tuo kurssi saadaan siirrettyä taulukkoon joka päivittyy joka päivä uudella rivillä?
dataa webistä exceliin
Eki
7507
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 7
Vanhimmat
tee webbikysely -ohjeita seuraamalla onnistuu
saat helposti poimittua taulukosta tietyn osakkeen kurssin esim. toiseen taulukkoon johon keräät kurssitiedot.
Uuden rivitiedon tekeminen onnistuu kun kopioit kaavasta pelkän arvon Copy - Paste Special (Values) -toiminnolla käyttäen uudelle riville siirtymisessä vaikkapa Activecell.Offset -makrokomentoa tai sitten Find-komennolla etsit seuraavan tyhjän rivin.
Kiitos neuvoista. Pientä säätöä vielä. Nyt vlookup toimii jotenkuten mutta jos haluan hakea merkkijonoa Itä-Eurooppa.fi niin haun tuloksena tulee mätsäys rahastoon Eurooppa.fi
Miten haen niin että merkkijonon täytyy täysin vastata annettuja hakuehtoja? Äkkiseltään en tätä keksinyt.
Jostain syystä kun tuon 'False' parametrin lisää siihen vlookup -funktioon, haku ei enää toimikkaan. haettava merkkijono on kyllä ihan ok. Haitanneeko mitään jos tuo merkkijono sisältää välilyöntejä?
että VLOOKUP-kaavan Range ei ylety haettavaan tietoon asti, se voisi selittää sen että "closest match" Eurooppa.fi löytyy mutta ei "exact match" Itä-Eurooppa.fi.
Kannattaa laittaa Rangeen reippasti rivejä ja sarakkeita siltä varalta että taulukkoon tulee lisää tietoa.
Välilyöntihän on merkki siinä missä muutkin eli se ei haittaa Excelissä.
Sainkin tuon muuten toimimaan mutta en ole ainakaan vielä onnistunut FIND -funktion avulla saamaan toimimaan niin että automaattisesti päivittyisi seuraavaan tyhjään soluun. olisiko neuvoja?
homma onnistuu.
Alla oleva makro hakee 1. tyhjän solun A-sarakkeesta rivistä 10 lähtien:
Sub EtsiTyhjäSolu()
'
' EtsiTyhjäSolu Macro
' Macro recorded 11.3.2004 by Excelit.fi
'
Range("A10").Select
Cells.Find(What:="", After:=ActiveCell, LookIn:=xlValues, LookAt:= _
xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _
True).Activate
End Sub