Příspěvky uživatele

pmn je to tam popísané rovnako, ako som použil vo svojom riešení. No nič, hlavne, že si to nakoniec zvládol.

David, teraz skutočne nemám čas to riešiť, tak na mňa nespoliehaj, prosím. Ďakujem.

Nie som si istý či rozumiem a ani nemám príliš čas, pravdu povediac. Bude musieť pomôcť niekto iný...

Prílohu to nevzalo, ani na opakovaný pokus, chce to znovu nejaký text z kontrolného obrázku, ktorý nevidím, prdím na to, príloha je v: http://ulozto.cz/uploaded/8526345825724969915/54430084/4c812ed4a97b11300bc36ad85119bd36?uploaded=1&p_hash=alebohttp://ulozto.cz/xqYU9WTd/pom-zip

Graf lze vytvořit i bez kontingenčky. Domnievam sa, že nelze. Aspoň v 2010 pmn nelze. Síce klikneš na možnosť vytvoriť kontingenčný graf, ale k nemu sa ti vytvorí zároveň KT, v ktorej sú dáta pre graf

. Excel 2013 nemám, tak sa nebudem hádať o blbosti do krvi, je mi to jedno. Lubo píše, že tvoja príloha neobsahuje powerpivot data. Pmn obsahuje, akurát sa nedajú zobraziť v nižšej verzii excelu. Vyrobil som si teda svoj powerpivot projekt v 2010 a v prílohe ukazujem, ako sa to dá riešiť. Snáď to v 2013 pobeží. Na liste Sheet1 som si vytvoril nejaké sample data, tie sú nalinkované do powerpivotu. V ňom sú vytvorené 3 measures, z ktorých posledná (YoY) je použitá v kontingenčnom grafe na liste PivotChart. Ako som uviedol, ku grafu si excel tvorí kontingenčnú tabuľku automaticky, tá je na liste Data for Sheet2 Chart 1. Ako vzor to snáď stačí, nie som zatiaľ na powerpivot žiadny expert.

abych si hned mohl vytvořit grafy? (bez kontingenční tabulky) Do prílohy som nepozeral a mám Excel 2010. Pokiaľ mi je známe, tak pre graf z powerpivotu sa vždy vytvorí najprv kontingenčka (aspoň v 2010, pochybujem, že v 2013 to bude inak). Inak samozrejme, počítanú položku je možné vytvoriť priamo v powerpivote pomocou DAX formulí.

Trochu rýchlejší kód než riešenie od marjankaja, ktorý navyše odstraňuje prípadné medzery:Sub Rozdel()
Dim myArr As Variant, myRng As Range, i As Integer, myStr As String
myStr = WorksheetFunction.Substitute([A1], " ", "")
myArr = Split(myStr, ";")
Set myRng = [A3].Resize(UBound(myArr) + 1, 1)
myRng = WorksheetFunction.Transpose(myArr)
Erase myArr
Set myRng = Nothing
End Sub

'Anyone who cannot speak clearly and simply should say nothing and continue to work until he can do so.' (Sir Karl Popper)

Skús to pochopiť z prílohy. Na 4. list sa doťahujú dáta z listov 1,2 a 3. Základom je vzorec v žltých bunkách, ten je prekopírovaný do zelených buniek, a to tak, že myšou označíš tie 3 žlté bunky a potom ťaháš do zelenej oblasti.

V rámci svojich malých skúseností s touto problematikou mám skôr zažité ADO (komunikácia Excel-Access riadená z Excelu, t.j. VBA písané v Exceli). Ale ber to s rezervou, pokiaľ má niekto iný názor, prieť sa nebudem, ako píšem, až také skúsenosti, aby som mohol fundovane argumentovať, nemám... Okrem toho, ja cez ADO nalievam data z Excel do Access, čiže je to zrejme opačný smer toku dát (push), než riešiš Ty (pull). Každopádne, ADO v mnou popisovanom prípade bez problémov, čo sa týka rýchlosti, spracovanie prebieha v podstate okamžite, z Excelu na lokále, do Accessu na serveri.

Chlape, Ty si jak kolovrátok. Palooo, eLCHa, i ja rozumieme, čo chceš. Jediný, kto nerozumie, si Ty!

spôsob č. 1 Novú verziu makra (jednotlivé moduly) vyexportuj A TO TAK, ŽE VO VBE V OKNE PROJEKTOV (PROJECT EXPLORER) KLIKNEŠ PRAVÝM TLAČÍTKOM MYŠI NA DANÝ MODUL A V KONTEXTOVOM MENU DÁŠ EXPORT (VZNIKNE SÚBOR S PRÍPONOU BAS) A TEN POTOM POŠLEŠ KOLEGOM, KTORÍ SI ÚPLNE ROVNAKO NAIMPORTUJÚ

spôsob č. 2 Preštuduješ link, ktorý som posielal a pokúsiš sa ho adaptovať tak, aby si to celé (export i import, eventuálne prepísanie modulu obsahom aktuálnej verzie modulu) riadil programovo.

Panebože, nemôžeš od nikoho čakať, ze to celé bude robiť za Teba a zadarmo, toto už totiž nie je úplne triviálna vec na pár minút!!!

@marjankaj: Má tam asi citlivé dáta

. Pokiaľ si skutočný odborník, tak to predsa dáš i bez prílohy, ni?

Svoj predošlý príspevok som doplnil, prečítaj si posledný odstavec a zamysli sa nad tým, či by sa to nedalo poriešiť uvedeným spôsobom...

Tak to urob tak, ako som písal na začiatku. Keď budeš chcieť pridať riadok, než to urobíš, zaklikaj si všetky listy a potom vlož riadok, vpíš potrebné údaje a výber skupiny listov zruš klikom na inú záložku

. Je neuveriteľné, že Pavlus, Palooo, marjankaj i ďalší, mňa nevynímajúc, ktorí veciam rozumejú, poslednou dobou sktroskotávajú na požiadavkách naprostých amatérov

. Čím to asi bude?
Radšej ani nechcem vedieť, prečo majú byť tie samé dáta na rôznych listoch, to je už od samého začiatku nezmysel. Na ďalšie listy sa majú doťahovať cez vzorec, v tomto prípade prichádza do úvahy funkcia INDIRECT (NEPŘÍMÝ.ODKAZ). Volatilné funkcie príliš v láske nemám, ale tuná by mohla byť vcelku vhodným riešením.

Presne ako píšeš: DĚLÁŠ TO BLBĚ

V prílohe posielam názorný príklad, ako to urobiť cez rozšírený filter (prvý list) a cez query (2 list). Tým už definitívne s týmto vláknom končím. Máš tam obrázky, snáď to už bude konečne jasné

edit:refresh je Ctrl+Alt+F5, nie Alt+F9 ako som napísal do príkladu, sorry
V té kolonce Copy to, jak je tam ten znak | (alt+w?) - ten je na co? To nie je znak, ale blikajúci kurzor

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje