< návrat zpět

MS Excel


Téma: Porovnání sešitů rss

Zaslal/a 26.5.2011 12:21

JAKDobrý den,potřebuji napsat makro, které bude porovnávat dvě tabulky. Tabulky jsou stejné, potřebuji zjistit zda jsou v tabulkách stejná data. Šlo by udělat něco takového, že bych měl otevřené oba soubory. V jednom vybral nějakou oblast a porovnal jí s vybranou oblastí v druhém souboru? Výsledek by pak byl výpis, jaké buňky se liší. Pokouším se tento problém vyřešit už delší dobu, ale stále nevím jak pracovat s vybranou oblastí. Děkuji za případnou odpověď.

Příloha: zip5084_priklad.zip (3kB, staženo 13x)
Zaslat odpověď >

icon #005086
Poki
Nevim, jak jste zbehly v psani maker, ale nejjednodussi by asi bylo si nejdriv vybrane oblasti ulozit do promennych a pak s nimi uz pracovat...
Kdyz chcete oblasti vybrat, je nutne pri jejich ukladani do promennych prepnout na konkretni sesit.
Jednotlive bunky uz pak muzete projit a porovnat jednoduchy cykles For Each...Next

Sub Oblasti()
Workbooks(2).Activate
Set oblast1 = Range(Selection.Address)
Workbooks(3).Activate
Set oblast2 = Range(Selection.Address)
MsgBox "Oblast1: " & oblast1.Address & vbNewLine & _
"Oblast2: " & oblast2.Address
End Sub
citovat
#005087
JAK
Děkuji za rychlou odpověd. Teprve se VBA učim...nevím zda mi tato odpověď bude stačit, ale uvidíme...jdu se trápit dál 2citovat
icon #005088
Poki
tak jsem zkusil neco vytvorit, zkuste to, treba to fungovat podle predstav.
Jen pro zacatek, jako dva posledni soubory musite otevrit ty dva, ktere chcete porovnavat a v obou musite pred spustenim makra oznacit oblasti, ktere chcete porovnat (museji mit stejny pocet radku a sloupcu).
V priloze jsou dva soubory, ktere jsem pouzival pro testovani (makro se nachazi v souboru PrikladTabulky2.xls)
Příloha: zip5088_prikladtabulky.zip (19kB, staženo 45x)
citovat
#005122
JAK
Děkuju moc, funguje to perfektně.citovat
#005190
JAK
Dobrý den,mohu ještě jeden dotaz? Makro funguje parádně, až na jeden případ. Mám tabulku, kde po stisku tlačítka odstraním nějaké řádky (po opětovném stisku se řádky opět objeví). Když dám překontrolovat tabulku se zakrytými řádky, makro nahlásí chybu, že neodpovídá počet řádků. Šlo by to nějak obejít, aby si zakrytých řádků při kontrole nevšímal? Děkuji.citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Vynásobit hodnoty kurzem - Power Query

Alfan • 26.4. 7:56

Relativní cesta - zdroje Power Query

Alfan • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

elninoslov • 26.4. 7:54

Vynásobit hodnoty kurzem - Power Query

lubo • 25.4. 19:18

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 15:12

Relativní cesta - zdroje Power Query

Alfan • 25.4. 15:08

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 14:21