jasné, že mrzne, lebo v hárku 1 máš len 1 riadok a príkaz xlDown pre neho v tom prípade znamená skok na úplne posledný riadok excelu a to je 1 048 576. riadok ;)
Zato som ti vravel, že aj v hárku 1 môžeš mať zoznam a nie len jeden riadok.
Dopĺňam ti preto makro tak, aby ani takýto stav neviedol do chyby (ale samozrejme, riadok s údajmi musí byť v hárku 1 v 3. riadku)
Okrem toho sa porovnávajú len prvé tri stĺpce! Ak chceš na zhodu porovnávať aj 4. stĺpec, potrebné doplniť do kódu.