Odstranění duplicit v tabulce se sečtením jejich cen

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

lumoravec
nováček
Příspěvky: 4
Registrován: listopad 18
Pohlaví: Nespecifikováno

Odstranění duplicit v tabulce se sečtením jejich cen

Příspěvekod lumoravec » 04 lis 2018 00:07

Dobrý den, mám tabulku, ze které potřebuji vyloučit duplicitní záznamy, ale s tím, že jsou u nich vedeny ceny, které bych potřeboval z duplicit sečíst a tuto částku vypsat. Nějak si s tím nevím rady.

Děkuji za nápady.

z tabulky vyloučit duplicitní jména ve sloupci C (František, Zbyněk) a do sloupce E vypsat součty duplicit (František = 445, Zbyněk = 800). A aby toho nebylo málo, tak počet řádků (jmen) se mění.
Nemáte oprávnění prohlížet přiložené soubory.



Reklama
Uživatelský avatar
atari
Level 4.5
Level 4.5
Příspěvky: 1798
Registrován: říjen 08
Pohlaví: Muž

Re: Odstranění duplicit v tabulce se sečtením jejich cen

Příspěvekod atari » 04 lis 2018 00:15

Kontingenční tabulka

MePExG
Level 1.5
Level 1.5
Příspěvky: 101
Registrován: srpen 16
Pohlaví: Muž

Re: Odstranění duplicit v tabulce se sečtením jejich cen

Příspěvekod MePExG » 04 lis 2018 07:37

Doplnil som ďalšie dva stĺpce a vytvoril kt (priložený súbor).
Nemáte oprávnění prohlížet přiložené soubory.

Uživatelský avatar
Grimm
Level 1
Level 1
Příspěvky: 52
Registrován: září 17
Pohlaví: Muž

Re: Odstranění duplicit v tabulce se sečtením jejich cen

Příspěvekod Grimm » 04 lis 2018 12:28

Řešení pomocí VBA.
Nemáte oprávnění prohlížet přiložené soubory.

MePExG
Level 1.5
Level 1.5
Příspěvky: 101
Registrován: srpen 16
Pohlaví: Muž

Re: Odstranění duplicit v tabulce se sečtením jejich cen

Příspěvekod MePExG » 04 lis 2018 15:49

Prikladám riešenie pomocou PowerQuery. Stačí zmeniť údaje v zdrojovej (modrej) tabuľke a aktualizovať (Data-Refresh = Atl+F5) zelenú tabuľku.
Nemáte oprávnění prohlížet přiložené soubory.

lumoravec
nováček
Příspěvky: 4
Registrován: listopad 18
Pohlaví: Nespecifikováno

Re: Odstranění duplicit v tabulce se sečtením jejich cen

Příspěvekod lumoravec » 05 lis 2018 07:51

to MePExG tohle řešení se mi líbí, jen bych potřeboval, aby se vypsali v nové tabulce i ty data, kde je to vypsáno jen jednou.
Díky.

MePExG
Level 1.5
Level 1.5
Příspěvky: 101
Registrován: srpen 16
Pohlaví: Muž

Re: Odstranění duplicit v tabulce se sečtením jejich cen

Příspěvekod MePExG » 05 lis 2018 08:24

Odstránil som teda filter.

Dodatečně přidáno po 33 minutách 7 vteřinách:
Na to skutočne stačí obyčajná kt a použitie je to isté.
Nemáte oprávnění prohlížet přiložené soubory.

lumoravec
nováček
Příspěvky: 4
Registrován: listopad 18
Pohlaví: Nespecifikováno

Re: Odstranění duplicit v tabulce se sečtením jejich cen

Příspěvekod lumoravec » 06 lis 2018 08:19

to Grimm: to je super, akorát bych potřeboval, aby se mi porovnávali stejná licenční čísla, protože jedno ID může mít více licenčních čísel. Zkoušel jsem ve VB přepsat sloupec A na sloupec B, ale to mi začalo dělat blbosti. Poradíte mi jak to udělat.
Díky za ochotu.

Uživatelský avatar
Grimm
Level 1
Level 1
Příspěvky: 52
Registrován: září 17
Pohlaví: Muž

Re: Odstranění duplicit v tabulce se sečtením jejich cen

Příspěvekod Grimm » 06 lis 2018 09:10

Přikládám upravený soubor. Jinak změny byly provedeny na těchto místech kódu:

Set OblastKriterii = Range("B2:B" & MaxRadek)

a

Unikat.Add arrTabulka(i, 2), CStr(arrTabulka(i, 2))
Nemáte oprávnění prohlížet přiložené soubory.

lumoravec
nováček
Příspěvky: 4
Registrován: listopad 18
Pohlaví: Nespecifikováno

Re: Odstranění duplicit v tabulce se sečtením jejich cen

Příspěvekod lumoravec » 06 lis 2018 15:14

Super, díky moc. To je přesně to co potřebuji. Velice děkuji za ukázku změn ve zdrojovém kódu.


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • vyhladavanie, doplnenie vsetky relevantne-ale bez duplicit-excel
    od majad » 26 led 2018 09:16 » v Kancelářské balíky
    2
    363
    od elninoslov
    30 led 2018 19:33
  • Hry a jejich zobrazení
    od Djscrech » 06 lis 2018 14:29 » v Hry
    1
    260
    od Karrex
    06 lis 2018 15:32
  • Virtuální porty a jejich možnosti
    od jarajarda » 27 kvě 2018 14:30 » v Problémy s hardwarem
    8
    756
    od jarajarda
    28 kvě 2018 21:59
  • Paměti flash a jejich opotřebení
    od petr.sadek » 09 lis 2018 20:40 » v Vše ostatní (hw)
    1
    392
    od petr22
    09 lis 2018 20:42
  • Odstranění zápisu v kalendáři
    od teichmann.ondrej » 21 pro 2017 17:38 » v Mobily, tablety a jiná přenosná zařízení
    0
    267
    od teichmann.ondrej
    21 pro 2017 17:38

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: CommonCrawl [Bot] a 0 hostů