• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

Příspěvky uživatele

Kod by mohl vypadat nejak takto:


let
SourceParam = Excel.CurrentWorkbook(){[Name="tblParam"]}[Content],
Mesic = SourceParam{0}[Hodnota],
Rok = SourceParam{1}[Hodnota],


Source = Folder.Files("Z:\filtr\"),
#"Added Custom" = Table.AddColumn(Source, "Custom", each Excel.Workbook([Content])),
#"Removed Other Columns" = Table.SelectColumns(#"Added Custom",{"Custom"}),
#"Expanded Custom" = Table.ExpandTableColumn(#"Removed Other Columns", "Custom", {"Data", "Kind"}, {"Custom.Data", "Custom.Kind"}),
#"Filtered Rows" = Table.SelectRows(#"Expanded Custom", each ([Custom.Kind] = "Sheet")),
#"Expanded Custom.Data" = Table.ExpandTableColumn(#"Filtered Rows", "Custom.Data", {"Column1", "Column2", "Column3", "Column4", "Column5", "Column6"}, {"Custom.Data.Column1", "Custom.Data.Column2", "Custom.Data.Column3", "Custom.Data.Column4", "Custom.Data.Column5", "Custom.Data.Column6"}),
#"Promoted Headers" = Table.PromoteHeaders(#"Expanded Custom.Data"),
#"Merged Columns" = Table.CombineColumns(Table.TransformColumnTypes(#"Promoted Headers", {{"bla bla", type text}, {"Vyfakturováno", type text}}, "cs-CZ"),{"bla bla", "Vyfakturováno"},Combiner.CombineTextByDelimiter("", QuoteStyle.None),"Merged"),
#"Renamed Columns" = Table.RenameColumns(#"Merged Columns",{{"Merged", "Vyfakturováno"}}),
#"Changed Type" = Table.TransformColumnTypes(#"Renamed Columns",{{"Vyfakturováno", type date}}),
#"Removed Errors" = Table.RemoveRowsWithErrors(#"Changed Type", {"Vyfakturováno"}),
#"Filtered Rows1" = Table.SelectRows(#"Removed Errors", each Date.Year([Vyfakturováno]) = Rok and Date.Month([Vyfakturováno]) = Mesic),
#"Added Index" = Table.AddIndexColumn(#"Filtered Rows1", "Index", 1, 1),
#"Removed Other Columns1" = Table.SelectColumns(#"Added Index",{"Index", "Číslo", "Název"})
in
#"Removed Other Columns1"

elninoslov: Dokaze, je vsak potreba nacitat nikoliv ze souboru, ale z adresare (from file - from folder). Pocet a nazvy nehraji roli, staci nacist adresar (a pripadne specifikovat, ktere soubory se maji nacist, napr vsechny xlsx a txt a ostatni ignorovat).

Jinak se to da udelat i primo v excelu.

http://www.k2e.com/tech-update/tips/728-tips-adding-a-password-to-make-an-excel-workbook-read-only

Neslouzi k tomuto pristupova prava?

Pri vytvareni kalkulacnich poli jsem na razeni nemyslel. Neni vylouceno, ze se to nejak udelat da, ale bohuzel ted nemam mnoho casu na detailni zkoumani. Az budu mit chvilku, tak se podivam, jestli by to neslo nejak elegantne vyresit pomoci Power Pivot add-inu.

Nemente to na 0, ale nechte policko prazdne, jak je videt ze screenshotu.

Nasledujici postup je pro Excel 2013 (anglicka verze), u jinych verzi se muze postup mirne lisit.

1. Odstrante z Hodnot Podil %
2. Pridejte do Hodnot podruhe Castka (takze V KT ted budete mit 2x stejnou hodnotu vedle sebe) a pole Sum of Cast prejmenujte na neco jako Aktualni/predchozi
3. Kliknete kamkoliv na nejakou hodnotu ve sloupci Aktualni/predchozi a pouzijte Field Settings - Show Values as - % Of, Base field ROK, Base item (previous) a OK (prilozil jsem screenshot)
4. Uz jste vicemene hotov, ted uz staci pouze doupravit formatovani (Format cisel, nahradit chyby ap). Jeste byste se mohl chtit zbavit sloupce Aktualni/predchozi pro prvni rok, ktery ukazuje 100% - pokusim se jeste pohledat, jestli to jde udelat elegantneji nez schovat sloupec.

Pokud je to ono, tak dejte vedet a napisu sem postup.

Mel jste na mysli to, co je v priloze?

AL: Rozumim, chtel jsem ukazat alternativu k beznym postupum. Jak jsem jiz psal, s Accessem ani SQL serverem zkusenosti moc nemam, proto je ani nechci srovnavat. Kazdopadne PQ za urcitych podminek umi pracovat s mnoha tabulkami v jednom kroku (napr umoznuje nacist adresar s x soubory s tabulkami a spojit je).

Kazdopadne, advanced filter jsem vyzkousel na verzi 2010 a tam zda se funguje. Pristup k verzi 2007 bohuzel nemam.

Prikladam reseni pomoci Power Query, snad pomuze.

Tak konecne se mne snad povedlo upravit Power Query tak, aby splnovalo zadani. Nebylo to uplne trivialni, nicmene po mirne manualni uprave kodu uz by to melo byt OK.

Co se Accessu tyce, tak s tim moc zkusenosti nemam, asi i proto se mne zda PQ jednodussi a pro dane ucely vhodnejsi. Navic PQ dokaze kombinovat velke mnozstvi ruznych zdroju (textove soubory, excel soubory, cele adresare, web, ruzne databaze - namatkou access, Sql, Oracle - sharepoint, ODBC a dalsi) dohromady, umi pracovat s obrovskym mnozstvim dat (stamiliony radku by nemel byt problem) a vyrazne dokaze zredukovat velikost souboru (samozrejme za predpokladu, ze data nejsou primo v danem souboru, ale ziskany pres connection popsane vyse). Dalsi velkou vyhodou je rychlost zpracovani oproti napr maticovym vzorcum.

Ktera barva? :-)

Aha, uz jsem si vsimnul EDITu. Tak to netusim, mozna proto, ze jsem si s tim pred ulozenim trochu hral a menil jsem barvy bunek..

Elninoslov: Ulozil jste pred refreshem soubor? Bez ulozeni to nebude fungovat.. Po rychlem testu u sebe to ukazuje 2.

Maximus: Vypada to, ze Excel nechce spravne interpretovat vzorec, ktery rika, kde je soubor ulozen. Zkuste jit do listu Tymy, kliknout do bunky E2 a potvrdit enter. Pak by to melo jiz fungovat.

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse