Excel - využití maker (součet řádků)

[Lueticky_kretek]

Zdravím,

mám následující problém.

Mám soubor (2p.xls

2p.xls

(37 KiB) Staženo 65 x

) , který obsahuje údaje ,které potřebuji vysčítat vždy do jednoho řádku podle zadaných kritérií.

Princip by měl být následující: soubor 2p.xls je seřazen dle sloupců B a E.
Potřebuji,aby makro vysčítalo a vytvořilo pouze jeden řádek (viz. žlutý řádek v souboru 2p_new.xls

2p_new.xls

(39 KiB) Staženo 41 x

) s tím,že by řádky které sčítal odmazal a zůstal tam jen výsledný řádek. Barevný zvýraznění tam být nemusí, je tam je pro názornost.
Hodnoty v souboru jsou názorné a budou se lišit, pořadí sloupců nikoliv a ten bude vždy stejný ( má představa je tedy,že makro bude pracovat se sloupci E, B,C,D)

Cílem je mít co nejmenší xls soubor,kde bude-li se opakovat vícekrát číslo , tak ho vysčítej a udělej z něj pouze jeden řádek.
Konečný soubor by měl pak vypadat nějak takhle 2p_end.xls

2p_end.xls

(15.5 KiB) Staženo 37 x

Snad jsem to popsal srozumitelně.

Děkuji moc za jakoukoliv pomoc.

[navstevnik]

Pozadavek na co nejmensi soubor je dominantni, nebo jde jen o prehlednost?
V ukazkach nejsou zobrazeny vzorce v radcich Celkem pod tabulkou, takze neni jak zkontrolovat operace, co je scitano za jakych podminek.
Uvazovals pouzit funkcionalitu souhrny (nabidka Data>Souhrny)? data jsou jiz setridena, takze postaci souhrny pri kazde zmene polozky smer ( z ukazky vyplyva, ze je toto cislo jedinecne, prirazene kombinaci obvod+typ+smer)?
Pokud toto nevyhovuje, je mozno uvazovat o procedure, ktera v podstate bude vykonavat totez.
PS: ukazky mohly byt v jednom sesitu

[Lueticky_kretek]

Omlouvám se za tolik souborů, máš pravdu,že to mohlo být v jednom sešitu.

Sčítat by se vždy měly sloupce G (délka), H(zpráv), I (Fisk), J (Po slevě), K (s DPH).
De facto se jedná o sumu,ale potřebuji ,aby se to provádělo automaticky tj. soubor se naplní údaji a procedurua(makro)) by vysčítalo hodnoty.

Vždy jsou nějaká řádky víckrát a požadavek je,aby co je víckrát bylo ve výsledku jako jeden řádek s tím, že budou vysčítané sloupce viz. výše.

Díky

[navstevnik]

V priloze je pracovni verze aplikace upravujici jeden soubor typu 2p.xls.
Plati:
- polozky jsou setrideny podle obvod+typ+smer+cislo
- polozka cislo (E:E) je jedinecne cislo prinalezejici shodnym polozkam obvod+typ+smer
- ulozeni zaznamu a ostatnich udaju na listu je vzdy shodne

Souhrnne udaje Celkem za zaznamy plati pro co?

Procedura (na listu Start upravit parametry, zatim nutno spustit v modulu1 - Sub Uprav) secte pozadovane hodnoty za zaznamy se shodnymi hodnotami v obvod+typ+smer (tedy cislo) a vlozi za posledni zaznam pred souhrnne udaje Celkem; vychozi zaznamy jsou odstraneny ( v pracovni verzi je prozatim blok k odstraneni oznacen zlute ve sloupci E:E, muzes tak zkontrolovat spravnost pozadovanych souctu).

[navstevnik]

To Lueticky_kretek:
Vzhledem k nijake reakci na pracovni verzi prikladam optimalizovanou verzi.

[Lueticky_kretek]

Kouknu se na to a dám vědět