Note: The other languages of the website are Google-translated. Back to English

Jak najít duplicitní nebo jedinečné hodnoty ve dvou sloupcích ze dvou listů?

Možná porovnat dva rozsahy ve stejném listu a zjistit, zda duplicitní nebo jedinečné hodnoty je pro většinu z vás snadné, ale pokud jsou tyto dva rozsahy ve dvou různých pracovních listech, jak můžete rychle zjistit duplicitní a jedinečné hodnoty v těchto dvou rozsazích? ? Tento výukový program vám představí několik rychlých řezů.

Porovnejte dva stejné sloupce záhlaví ve dvou tabulkách s vzorcem v aplikaci Excel

Porovnejte dva rozsahy ve dvou tabulkách s VBA

Porovnejte dva rozsahy ve dvou tabulkách s Kutools pro Excel

Karta Office Povolte úpravy a procházení na kartách v Office a vaše práce bude mnohem jednodušší ...
Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%
  • Znovu použít cokoli: Přidejte do svých oblíbených nejpoužívanější nebo nejsložitější vzorce, grafy a cokoli jiného a rychle je v budoucnu znovu použijte.
  • Více než 20 textových funkcí: Extrahovat číslo z textového řetězce; Extrahovat nebo odebrat část textů; Převádějte čísla a měny na anglická slova.
  • Sloučit nástroje: Více sešitů a listů do jednoho; Sloučit více buněk / řádků / sloupců bez ztráty dat; Sloučit duplicitní řádky a součet.
  • Rozdělené nástroje: Rozdělit data do více listů na základě hodnoty; Jeden sešit pro více souborů Excel, PDF nebo CSV; Jeden sloupec na více sloupců.
  • Vložit přeskakování Skryté / filtrované řádky; Count And Sum podle barvy pozadí; Posílejte hromadně osobní e-maily více příjemcům.
  • Super filtr: Vytvořte pokročilá schémata filtrů a použijte je na jakékoli listy; Typ podle týdne, dne, frekvence a dalších; Filtr tučně, vzorce, komentovat ...
  • Více než 300 výkonných funkcí; Funguje s Office 2007-2021 a 365; Podporuje všechny jazyky; Snadné nasazení ve vašem podniku nebo organizaci.

šipka modrá pravá bublina Porovnejte dva stejné sloupce záhlaví ve dvou tabulkách s vzorcem v aplikaci Excel

Pomocí vzorce v aplikaci Excel můžete porovnat dva stejné sloupce záhlaví, jak je uvedeno níže, na různých listech a najít duplicitní a jedinečné hodnoty:

1. Zadáním tohoto vzorce = COUNTIF (List1! $ A: $ A, A1) v prázdné buňce, která sousedí s rozsahem v listu 3. Viz screenshot:

2. lis vstoupit tlačítko na klávesnici a přetažením úchytu výplně vyplňte rozsah, který chcete porovnat s rozsahem v listu 1. (Nula čísla znamená duplicitní hodnoty ve dvou rozsazích a číslo 1 znamená jedinečné hodnoty v listu 3, ale ne v listu 1)

Tip:

1. Tento vzorec může porovnávat pouze dva sloupce se stejnou hlavičkou ve dvou tabulkách.

2. Pokud chcete najít jedinečné hodnoty v Listu1, ale ne v Listu3, musíte zadat výše uvedený vzorec =COUNTIF (list 3! $ A: $ A, A1) do Listu 1.


šipka modrá pravá bublina Porovnejte dva rozsahy ve dvou tabulkách s VBA

1. Držet ALT a stiskněte tlačítko F11 na klávesnici otevřete a Microsoft Visual Basic pro aplikaci okno.

2. cvaknutí Vložit > Modula zkopírujte VBA do modulu.

VBA: Porovnejte dva rozsahy ve dvou tabulkách

Sub CompareRanges () 'Update 20130815 Dim WorkRng1 As Range, WorkRng2 As Range, Rng1 As Range, Rng2 As Range xTitleId = "KutoolsforExcel" Set WorkRng1 = Application.InputBox ("Range A:", xTitleId, "", Type: = 8 ) Nastavit WorkRng2 = Application.InputBox ("Rozsah B:", xTitleId, Typ: = 8) Pro každý Rng1 v WorkRng1 rng1Value = Rng1.Value Pro každý Rng2 v WorkRng2 If rng1Value = Rng2.Value Pak Rng1.Interior.Color = VBA .RGB (255, 0, 0) Exit For End If Next Next End Sub

3. cvaknutí Běh nebo stiskněte tlačítko F5 spustit VBA.

4. Na obrazovce se zobrazí dialogové okno a měli byste vybrat jeden rozsah, se kterým chcete porovnat. Viz screenshot:

5. cvaknutí Ok a zobrazí se další dialog pro výběr druhého rozsahu. Viz screenshot:

6. cvaknutí Oka duplicitní hodnoty v rozsahu A a v rozsahu B jsou zvýrazněny červeným pozadím v rozsahu A. Viz screenshot:

Tipy: S tímto VBA můžete porovnat dva rozsahy ve stejném i v různých pracovních listech.


šipka modrá pravá bublina Porovnejte dva rozsahy ve dvou tabulkách s Kutools pro Excel

Pokud vám vzorec není vhodný a pro vás je VBA obtížný, můžete to zkusit Kutools pro Excel's Porovnat rozsahy funkce.

Kutools pro Excel obsahuje více než 300 užitečných nástrojů aplikace Excel. Zdarma to můžete vyzkoušet bez omezení do 30 dnů. Získat nyní

Prosím, aplikujte Porovnat rozsahy funkci kliknutím Kutools > Porovnat rozsahy. Viz snímek obrazovky:

Porovnejte se dvěma sloupci v různých listech:

1. cvaknutí Kutools > Porovnat rozsahy, na obrazovce se zobrazí dialog. Viz screenshot:

2. Určete rozsahy a pravidla, postupujte následovně:

Ponechat Porovnání ve stejném rozsahu zrušte zaškrtnutí a kliknutím vyberte dva rozsahy Rozsah A a Rozsah B, viz screenshot:

V rozevíracím seznamu v části Pravidla zadejte stejné hodnoty nebo různé hodnoty, které chcete najít;

3. cvaknutí Ok. Vyskakovací dialogové okno vám řekne, že jsou vybrány stejné hodnoty.

4. cvaknutí Ok v rozbalovacím dialogovém okně. V rozsahu A jsou vybrány stejné hodnoty mezi dvěma rozsahy.

Porovnejte dva rozsahy v roztažených listech

Pokud máte dva rozsahy ve dvou tabulkách, jak je uvedeno níže, a chcete je porovnat a zjistit různé hodnoty, můžete postupovat následovně:

1. cvaknutí Kutools > Porovnat rozsahy, na obrazovce se zobrazí dialog.

2. Určete rozsahy a pravidla, postupujte následovně:

Dovolená Porovnejte ve stejném rozsahu zrušte zaškrtnutí a kliknutím vyberte dva rozsahy Rozsah A a Rozsah B;

V rozevíracím seznamu v části Pravidla zadejte různé hodnoty, které chcete najít;

Zkontrolujte, zda má moje data záhlaví in možnosti sekce;

3. cvaknutí Ok. Vyskakovací dialogové okno vám řekne, že jsou vybrány stejné hodnoty.

4. cvaknutí Ok ve vyskakovacím dialogovém okně. Jsou vybrány různé hodnoty v rozsahu A. Viz screenshot:

Pokud chcete zjistit různé hodnoty v rozsahu B listu2, musíte tyto dva rozsahy vyměnit.

Porovnat rozsahy Funkce také může porovnávat rozsahy na stejném listu. Klikněte sem a dozvíte se více o Porovnání rozsahů.


Relativní články:


Nejlepší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2021 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Plné funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
karta kte 201905

Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
officetab dno
Komentáře (8)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
Ahoj, jak zjistím rozdíl mezi dvěma sloupci v excelu
Tento komentář byl moderátorem webu minimalizován
Jak zjistit stejná jména z různých sloupců. Pokud jeden sloupec obsahuje 2000 záznamů a druhý obsahuje 20000 záznamů, jak tedy tato jména porovnat a odlišit? Dík,
Tento komentář byl moderátorem webu minimalizován
jak porovnat data mezi dvěma různými excelovými listy?
Tento komentář byl moderátorem webu minimalizován
Ahoj, kód funguje, ale celý rozsah se zvýrazní, i když neexistují žádné duplicitní hodnoty. Pomoc!
Tento komentář byl moderátorem webu minimalizován
Ahoj, potřebuji vyhledat rozsah hodnot ve všech dostupných listech a v případě, že existují nějaké shody, vybarvit hodnotu v původním rozsahu. Vyzkoušel jsem následující kód: Sub Compare3() Dim WorkRng1 As Range Dim WorkRng2 As Range Dim Rng1 As Range Dim Rng2 As Range Dim DataRange As Range Dim ws As Worksheet xTitleId = "Buscar coincidencias" Set WorkRng1 = Application.InputBox("Seleccionar" equipos con cambios:", xTitleId, "", Type:=8) Nastavit WorkRng2 = Range("B1" & LastRow) pro každý Rng1 v WorkRng1 rng1Value = Rng1.Value pro každý ws v aktivním sešitu.Worksheets pro každý Rng2 v WorkRng2 If rng1Value = Rng2.Value Then Rng1.Interior.Color = VBA.RGB(200, 250, 200) Exit For End If Next Next Next End Sub Ale neprovede žádné změny, když existují shody... Mohl by někdo pomoci? ? Mnohokrát děkuji, přeji hezký den
Tento komentář byl moderátorem webu minimalizován
Ahoj, ráno, potřebuji vyhledat rozsah hodnot ve všech dostupných listech a v případě, že existují nějaké shody, vybarvit hodnotu v původním rozsahu. Vyzkoušel jsem následující kód: Sub Compare3() Dim WorkRng1 As Range Dim WorkRng2 As Range Dim Rng1 As Range Dim Rng2 As Range Dim DataRange As Range Dim ws As Worksheet xTitleId = "Buscar coincidencias" Set WorkRng1 = Application.InputBox("Seleccionar" equipos con cambios:", xTitleId, "", Type:=8) Nastavit WorkRng2 = Range("B1" & LastRow) pro každý Rng1 v WorkRng1 rng1Value = Rng1.Value pro každý ws v aktivním sešitu.Worksheets pro každý Rng2 v WorkRng2 If rng1Value = Rng2.Value Then Rng1.Interior.Color = VBA.RGB(200, 250, 200) Exit For End If Next Next Next End Sub Ale neprovede žádné změny, když existují shody... Mohl by někdo pomoci? ? Mnohokrát děkuji, přeji hezký den
Tento komentář byl moderátorem webu minimalizován
To je dobré. Zvýrazňuje pouze jednu duplicitní položku listu. Ale musím zvýraznit oba list, kde jsou duplicitní položky
Tento komentář byl moderátorem webu minimalizován
Do příkazu THEN musíte přidat druhý příkaz.


Zkuste to;

Sub CompareRanges()
'Aktualizace 20130815
Ztlumit WorkRng1 jako rozsah, WorkRng2 jako rozsah, Rng1 jako rozsah, Rng2 jako rozsah
xTitleId = "Zadejte rozsah pro srovnání"
Set WorkRng1 = Application.InputBox("Range A:", xTitleId, "", Type:=8)
Set WorkRng2 = Application.InputBox("Range B:", xTitleId, Type:=8)
Pro každý Rng1 In WorkRng1
rng1Value = Rng1.Value
Pro každý Rng2 In WorkRng2
Pokud rng1Value = Rng2.Value Then
Rng1.Interior.Color = VBA.RGB(255; 0; 0)
Rng2.Interior.Color = VBA.RGB(255; 0; 0)
Ukončete pro
End If
další
další
End Sub
Zatím zde nejsou žádné komentáře

Sociální sítě

Copyright © 2009 - www.extendoffice.com. | Všechna práva vyhrazena. Poháněno ExtendOffice. | |. | Sitemap
Microsoft a logo Office jsou ochranné známky nebo registrované ochranné známky společnosti Microsoft Corporation ve Spojených státech a / nebo jiných zemích.
Chráněno Sectigo SSL