Ausschließlich Unikate in extra Spalte

[Engel29]

Hallo,

SOS - ich bräuchte bitte eine Makro für folgende Aufgabe:

Zwei Text-Spalten miteinander vergleichen und ausschließlich die Unikate ausweisen. Doppelungen werden sowohl als auch gelöscht. Spalte 1 und 2 vergleichen Spalte drei zeigt alles was nicht doppelt war. 

Beispiel:
Spalte1.      Spalte2.          Spalte3.(Ergebnis)
Hund.         Hund.               Zebra
Katze          Katze.               Tiger
Maus.         Maus.               Hai
Zebra         Hai                   Delphin
Tiger.         Delphin

Ich hab schon alles durchsucht und werde nicht fündig - wer kann diese knifflige Aufgabe lösen? 
Freu mich - Danke und happy day
Engelchen

[LCohen]

D2: =INDEX(A2:B99;ZEILE(2:99)/2;REST(ZEILE(2:99);2)+1)
E2: =ZÄHLENWENN(D:D;D2:D99)
G2: =FILTER(D:D;E:E=1)

(Kopieren nicht nötig)

klappt nur mit Excel 365 oder kostenlos mit Excel Online.

[WillWissen]

Hallo Engelchen,

auch ich habe dir statt einer VBA- eine Formellösung (mit einem kleinen Umweg):

1. Kopiere deine beiden zu vergleichenden Spalten untereinander.
2. Füge eine Hilfsspalte zum Ermitteln der relevanten Zeilennummer ein und
3. Ziehe deine Unikate mit INDEX() heraus.

Wenn du jetzt die Unikate kopierst und sie wieder als Werte einfügst, kannst du die Hilfsspalten löschen.

Arbeitsblatt mit dem Namen 'Tabelle1'
	A	B	C	D	E	F
1	Hund	Hund		Hund		Zebra
2	Katze	Katze		Katze		Tiger
3	Maus	Maus		Maus		Hai
4	Zebra	Hai		Zebra	4	Delfin
5	Tiger	Delfin		Tiger	5
6				Hund
7				Katze
8				Maus
9				Hai	9
10				Delfin	10

Zelle	Formel
E1	=WENN(ZÄHLENWENN($D$1:$D$10;D1)>1;"";ZEILE())
F1	=WENNFEHLER(INDEX($D$1:$D$10;WENNFEHLER(KKLEINSTE($E$1:$E$10;ZEILE(A1));""));"")

Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016

Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg