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

MS Excel

Téma: VBA - sloučení řádku s duplicitou

Zaslal/a swomp 4.2.2016 15:59

Dobrý den,
potřebuji poradit s řešením následujícího problému přes VBA. Do přílohy jsem vložil tabulku, které se to týká.
Popis tabulky:
jedná se o tabulku se zápisem DIC, čísla dokladu, ..,..,potom finančn. částek rozdělených do 3ch skupin 10,15,21%.

Čeho potřebuji docílit je následující:
Potřebuji makrem prohledat tabulku a to dva sloupce DIC a čísl. dokladu. Tyto dva sloupce obsahují duplicity. Já potřebuji prohledat čísla dokladů a u těch co mají stejné číslo dokladu zkontrolovat zda mají stejné dič. Pokud ano potřebuji sloučit řádky dohromady (a to na konec tabulky) + původní řádky vymazat. Tam kde je stejné číslo dokladu ale rozdílné Dič ponechat v původním stavu.

Děkuji za každou radu.

Opraveno: číslo účtu na číslo dokladu

Příloha: 29872_clipboard01_excel.jpg (172kB, staženo 25x)

Zaslat odpověď >

---

Hav-Ran(4.2.2016 17:27)#029878

Toto sa mi zdá by mala zčasti zvládnuť kontingenčná tabuľka, len škoda že si nepriložil súbor ako to vyzerá a ako to má vyzerať. Vymysli falošné dáta a hotovo, len štruktúru ponechaj.
A ešte - píšeš že potrebuješ prehľadať čísla účtu - v tabuľke nič nevidno, žiadne číslo účtu.
Nikto nebude sám z hlavy vytvárať súbor, keď netuší čo je kde.citovat

elninoslov(5.2.2016 9:11)#029901

Skúste či je to to, čo ste chcel. Nezdá sa mi, že chcete zlučovať rôzne dátumy, a nepovedali ste ani koľko to má stĺpcov, akého formátu, či sa budú sčítavať (tak som to urobil) atď. Je to minimum informácii, navyše bez prílohy...

EDIT: 5.2.2015 09:08
Oprava prílohy
Na tom čo som si vytvoril to funguje tak ako si myslím, že aj má. Ak to Vy máte ako Tabuľku a nie tabuľku, alebo máte pred tým (asi áno) iné dáta atď, atď, tak to fungovať nebude.
Príloha je bezpodmienečne nutná.

Příloha: 29901_zosit2b.zip (72kB, staženo 23x)

citovat

swomp(5.2.2016 15:52)#029916

Dobrý den,
děkuji za váš návrh. Data se nijak nesčítají. Výskyt dokladu by ěl být max. 3x za sebou.
V okamžiku jak jsem nahrál ostrá data a následovala situace:

cz12345 / 1235
cz12345 / 1235
cz12345 / 1235
cz12345 / 1236
cz12345 / 1236
cz12345 / 1236
cz12345 / 1236
výsledek by pouze cz12345 / 1236

ale měl by byt cz12345 / 1235 a cz12345 / 1236
ale výskyt cz12345 / 1235 v tabulce zanikl (možná proto že měli stejné DIC?

V příloze přikládám soubor s dat a tabulkou, které se to týká.

Příloha: 29916_duplikate_test.7z (17kB, staženo 21x)

citovat

elninoslov(5.2.2016 19:35)#029921

Len mi nepovedzte aj teraz, že to nefunguje.
A podľa čoho sa vyberá hodnota v stĺpci 12 ? Raz je tam z ANA = N, druhý krát ale z ANA = A.

Příloha: 29921_zlucenie-duplikatov.zip (28kB, staženo 27x)

citovat

swomp(13.2.2016 18:39)#030076

dobrý den, omlouvám se za zpoždění. Ano nyní to funguje, jen se vyskytl nějaký problém při vymazání slučovaných řádků. Háže mě to na debug řádku
If Not Vym Is Nothing Then
-> Vym.EntireRow.Delete 'Vymaž riadky
End If

Jinak to slučuje jak má. Ale odstranění funguje ve vzorovém ale v ostré verzi nikoli.citovat

swomp(16.2.2016 13:16)#030127

Vrátil jsem se zět k tomu co jste psal dříve a je to v tom že v tabulce jsou i řádky které se neslučují. A zůstávají v tabulce nadále.

swomp napsal/a:

dobrý den, omlouvám se za zpoždění. Ano nyní to funguje, jen se vyskytl nějaký problém při vymazání slučovaných řádků. Háže mě to na debug řádku
If Not Vym Is Nothing Then
-> Vym.EntireRow.Delete 'Vymaž riadky
End If

Jinak to slučuje jak má. Ale odstranění funguje ve vzorovém ale v ostré verzi nikoli.

citovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse