pátek 29. ledna 2010

Tabulka výsledků - verze 2.7 - Bergerovy tabulky

Stahovat novou verzi můžete zde.

Změny ve verzi 2.7:
- doplněny další soutěže ke stažení - velké díky Vaškovi
- v křížové tabulce doplněny automatické rozměry sloupců a řádků podle nejširšího nebo nejvyššího
- po kliknutí na zápas v křížové tabulce se zabarví vybrané týmy.
- v Nastavení přidána volba "oboustranné výsledky v křížové tabulce"- požadavek od Pepy Hanuse. Po zatržení se generují v křížové tabulce výsledky oboustranně, tj. když spolu sehrají dva týmy jeden zápas, tak je výsledek zobrazen 2x, vždy z pohledu každého týmu.
- doplněna podpora pro výsledky basketbalu. U stahovaných dat pro basketbal byl u výsledku jiný formát buňky a proto nebyl převod u basketbalu správný.
- doplněn vstupní formulář (pod tlačítkem "Další tabulky"), kde je možné si vybrat týmy ze kterých chci vidět tabulku vzájemných zápasů. Týmy jsou na tomto vstupním formuláři seřazeny podle abecedy. Minimální počet vybraných týmů musí být dva. Tabulka může být vytvořena na nový list, do nového sešitu nebo na formulář. Řazení je zde podle JEN podle počtu bodů. V případě výběru na nový list, je na tomto novém listě tlačítko, kterým se tento list může smazat. Je to z důvodu, když se chci jen rychle mrknout na tabulku vzájemných zápasů u vybraných týmů a pak už tyto data nepotřebuji - tak můžu tento list hned smazat.

Edit 30.1.2010 - 11:58
- opraven odkaz pro stahování 1. nizozemské fotbalové ligy

Lobo 

7 komentářů:

surovastrava řekl(a)...

Konečne dobrá platforma - osobitný blog. Už som chcel napísať o tom na Pandoru ale predbehol ma Ladys.
Osobne používam veľmi podobný systém, len s rozdielom že si na úvod zobrazím formulár a na ňom zaklikám čo chcem vidieť (zachová posledné nastavenie) na webe. Podľa zakliknutých sa vo VBA vyberie presná adresa a vpravo na súbore zobrazí sa objekt web.browser s požadovanou webovou informáciou.
Prečo to tak je - je to operatívnejšie kvôli neustálej zmene webových aplikácií stávkových kancelárií. Približne 1x ročne menia základné nastavenie a čo to potom pre excelovské spracovanie znamená v praxi ? VŠETKO treba prerábať. S Vaškom sme na tom často prehrali boj, dokonca stávkové kancelárie prestali uvádzať údaje ako texty a dávali ich ako obrázky, s náhodnými menami takže nepomohla ani identifikácia mena objektu.
Ale nechcem túto perfektnú prácu znevažovať a želám Ti aby sa prestali objavovať rôzne verzie webov.
Ja osobne by som sa ešte pre tých čo sa ako ja zaoberajú live-tipovaním (ešte počas priebehu zápasu možno stále tipovať výsledok), spracovať výsledky iba 1.polčasov alebo zvlášť aj 2.polčasov (vo všetkých pohľadoch ktoré tam máš), kurzy na live-tipovaní resp. za polčas/výsledok sú oveľa atraktívnejšie.
Prajem veľa zdaru.
Igor

Unknown řekl(a)...

Díky za první komentář ;-)

V programování ve VBA jsem pořád začátečník, začal jsem cca před rokem a jsem samouk, takže každou radu přivítám. Mohl byste mi trošku víc popsat princip toho Vašeho uložení nastavení na webu?
Chápu to tak, že při otevření souboru v Excelu Vám vyskočí formulář, který si natáhne nastavení z webu, na formuláři provedu úpravy a po jeho zavření se tyto úpravy opět uloží na web? Jaké příkazy k tomu slouží?
Také zobrazení webové stránky v Excelu jsem zatím nikdy neřešil. Zdroj, který si "doporučili" Vašek a Richard je iFortuna, která má super statistiky i několik let zpět. Tak doufejme, že to zatím měnit nebude. Jen se budou muset někdy měnit url adresy. Ale když nás bude víc, tak to zas taková dřina nebude.

Tipařskou verzi souboru začínám vytvářet dnes a statistikami by se měla jen hemžit. Od Richard už mám 5-letou historii výsledků u některých soutěží. Tady je prozatimní seznam požadavků od Vaška, který bych tam chtěl zapracovat:

1) vývoj dle formy - = + (u všech tabulek)

2) dílčí výsledky (poločasy, třetiny ...) - u každého zápasu

3) průměr golů danách i inkasovaných u celé ligy i u jednotlivých
mužstev v každé tabulce a to konkrétně a i procentuálně a poměr výher,
remíz a proher (1-0-2)

ve druhém sloupci4) vývoj skore i s minutou změny - 0:1 (42.);
1:1 (87.); 1:2 (90.)

5) časový výpis utkání každého domácího a to včetně neodehraných s
datumy a časy v jednom sloupci a to samé u hostujících celků

6) a naposledy motivaci mužstev alespoň přibližně a sice na účast v
LM, UEFA, přímý postup a baráž pro ta lepší a přímý sestup a baráž pro
ta druhá ;)

7) možnost posouzení všech těchto údajů na jedinném místě prostým
pohledem u 2 vybraných mužstev stávající - stažené ligy

Díky za rady a připomínky!

Lobo

surovastrava řekl(a)...

Ahoj, na vysvetlenie a lepšie pochopenie - používam v exceli formulár, skladajúci sa z dvoch častí - vľavo comboboxy v ktorých vyberiem potrebné indexované položky a vpravo objekt web-browser ktorý si poskladá z comboboxov html-adresu a túto webovú stránku v sebe zobrazí.
Teda -- prezerám web, neprepisujem ho (ide predsa o externé stránky na ktoré nemôžem editačne vplývať) -- ale hodnoty z comboboxov si zapisujem na list POD formulár. Pri inicializácii formulára sa zapísané hodnoty načítajú do comboboxov a tak mám nastavené už od začiatku to, kde som predtým končil.
napr.
With Sheets("member")
.Range("B1").Value = cboPlayer1.Value
.Range("B2").Value = cboPlayer2.Value
' atď
End With

napr. inicializácia:
cboPlayer1.AddItem Range("B1").Value
'atď
´
Vaškove požiadavky - na tých sa zbytočne narobíš, (nikdy sa neskončia :-))), ak sa dajú stránky ZOBRAZIŤ , dajú sa aj skopírovať a uložiť do presného miesta (súbor z webu natiahnutý ako txt súbor sa dá potom spracovať presne rovnakým spôsobom ako si použil doteraz). Copy - paste - úprava.
Všetko čo urobíš je len informácia o tom, čo sa dá zachytiť ako momentálny stav (body,postavenie v tabuľke) ale logiku, čo tam vložíš aký podať tip - to je úplne iné kafe. Obrazne povedané - ak máš mercedesa ale nedočiahneš na volant - máš krátke ruky - neodvezieš sa, MUSÍ nasledovať to najdôležitejšie - odhad správneho tipu. V tom je najväčšie umenie,, nie v ukázaní dát ale v ich interpetácii ako predpovede najbližšieho vývoja - a to chce dlhodobé štatistiky, hľadanie podobných trendov a situácií.
Igor

Anonymní řekl(a)...

Zdravim

Zkousim pracovat s vasi excel aplikaci, bohuzel pri jakekoliv praci se mi zobrazi tabulka s chybovou hlaskou compile error cant find project or library "Pole(j, 1) = Format(Cells(i, "F"), "d.m.yyyy") 'datum" soubor otviram v office 2007. Taky se pokousim vytvorit nejakou excel aplikaci ktera by mi ulehcila tipovani ale zatim ji mam pouze v hlave :-)

Unknown řekl(a)...

Zdravím, s tou chybovou hláškou bude nejlepší, když se mi ozvete na email. Pak to určitě vyřešíme.

Můj email:
lobo1978@gmail.com

Anonymní řekl(a)...

Dobrý den,
chci se zeptat jak to vypadá s aktualizací tabulky verze 2.7. Sledoval jsem to na PANDOŘE a teď i zde.
S pozdravem Víta

Unknown řekl(a)...

čau Víťo,
teď makám na jiným projektu a zatím se ozval jen jeden člověk, že by chtěl nějaké úpravy a teď ty. Klidně napiš sem nebo přímo mě do emailu, co bys chtěl v tabulce novýho, co změnit atd.
Určitě se domluvíme. Zatím jsem měl v plánu, že až budu mít víc volna, tak oslovím Vladimíra a vytáhnu z něho nějaké rady jakým směrem ohledně řízení soutěží, by se měla tabulka ubírat. Jestli máš nějaké nápady ty, tak budu rád, když se podělíš. Já sám to nevyužívám a proto ani nemám moc inspiraci co by se tam mělo přidat.

Lobo