Diskuze k článku: Aktuální data trhů v obchodním deníku v MS Excelu

[Žito]

Izospin, ohledne TWS a Excelu, myslis pomoci API nebo existuje nejaky jiny zpusob?

[Martinek]

Snazim se vytvorit opcni denik, ktery mj. bude umet po zadani tickeru v jednom sloupci zobrazit aktualni hodnotu trhu v jinem sloupci (data bere z TOS). Napr. do bunky B2 zadam ticker RUT. Ted chci, aby se mi v bunce C2 zobrazila aktualni hodnota, tj. =TOS|LAST!RUT. Kdyz ale zkusim zapis =TOS|LAST!B2, misto hodnoty bunky B2 se hledaji data pro ticker "B2". Zkusil jsem to obejit pres jinou bunku, v niz jsem sloucil textove retezce a dosahl tak zapisu, ktery potrebuji (CONCATENATE("TOS|LAST!", B2)), ovsem vysledek se mi zas nedari zadnym zpusobem prevest z textu na funkci. :-)

Pokud by nekdo z mistnich excelovskych profiku vedel co s tim, budu velice rad.

[Mrakomor]

Co zkusit absolutni referenci? =TOS|LAST!$B$2

[Martinek]

Mrakomor: To jsem taky zkousel, bohuzel bez uspechu (hlasi chybu ve vzorci)...

[Mrakomor]

Predpokladam, ze tohle uz jste zkousel, ale prece: =TOS|LAST!'B2'

[Martinek]

Mrakomor: Jj, zkousel, take bez uspechu... ale diky. :-)

[harmonie]

A co zkusit např :

[harmonie]

A co zkusit tohle:

[harmonie]

Chtěl jsem přiložit obrázek, nějak mi to nejde. Tak to zkusím opsat.

V listu zadat: [bold]
=TOS_last(B2) [/bold]

A v makrech napsat:[bold]
Function TOS_last (Ticker as String)
TOS_last = "=TOS|LAST!" + Ticker
Function End
[/bold]

Ale nezkoušel jsem to.

[Martinek]

harmonie: e-ee, take nefunguje; da to dohromady sice spravny textovy zapis, ale nelze pouzit v podobe funkce...

[harmonie]

Tohle by mohlo:


Funkce: [bold]
Function TOS_last(Cena As Range, Ticker As String)
With Cena
.FormulaR1C1 = "=TOS|LAST!" + Ticker
End With
End Function
[/bold]

[Martinek]

harmonie: A volat opet jako =TOS_last(B2) ? Pokud ano, tak nefunguje... Ale diky. :-)

[harmonie]

Příklad vyplnění listu:
A2 : [bold]=TOS_last(C2; B2) [/bold] - [ital]"plnící" funkce [/ital]
B2 : [bold] RUT[/bold] - [ital]ticker [/ital]
C2 : [bold] [/bold] - [ital]výsledek [/ital]

Ale nezkoušel jsem to. Jsou to jen takové pokusy.

[Alec]

Martine,

jen tak zběžně na to tady koukám. Napadá mě tento postup pro VBA, vzorce nijak moc neovládám:

- vyvolávat změnou buňky (kde je označení titulu) spuštění procedury, která dosadí ten vzorec již správně poskládaný (včetně titulu)
- napsat jednoduchou proceduru, která by řešila to složení a dosazení požadovaného vzorce

je to možná trochu složité, a patrně bude existovat jednodušší cesta pomocí vzorce


Aleš

[Martinek]

harmonie: Taky bez uspechu... Ale diky. :-)