Duplikate finden mit SVERWEIS

[gerdle]

Hallo Leute,

ich will einen Code schreiben in dem ich Spalte A und Spalte D nach Duplikaten durchsuche.
Wenn ein Duplikat gefunden wird soll der Name in Spalte E, der hinter dem Wert in Spalte D steht in Spalte B zum passenden Wert von Spalte A kopiert werden.

Bisher hab ich folgenden Code:

Diese Arbeitsmappe - 1

Option Explicit
Private Sub Workbook_Open()

=SVERWEIS(A2;D$2:E$111;2;FALSCH)
=SVERWEIS(A3;D$3:E$111;2;FALSCH)
=SVERWEIS(A4;D$4:E$111;2;FALSCH)
=SVERWEIS(A5;D$5:E$111;2;FALSCH)
=SVERWEIS(A6;D$6:E$111;2;FALSCH)
=SVERWEIS(A7;D$7:E$111;2;FALSCH)
=SVERWEIS(A8;D$8:E$111;2;FALSCH)
=SVERWEIS(A9;D$9:E$111;2;FALSCH)
....


End Sub


Kann mir einer von euch sagen, wieso der nicht funktioniert?
Bei mir werden alle Zeilen rot gefärbt und es kommt die Fehlermeldung:

Fehler beim Komplilieren:
Außerhalb einer Prozedur ungültig

Vielen Dank für eure Antworten!

 

[Scythe1988]

wieso schreibst du excel formeln in vba? das gehört in die zellen der tabelle

 

[sthyen]

Scythe hat recht, ich würde die Formel auch direkt in die Tabelle integrieren. So gut kenne ich mich mit VBA nicht aus, aber ich denke, dass du die Formel dort anders anwenden müsstest.

Mit deiner Formel durchsuchst du Spalte D nach dem Wert aus Zelle A2 (A3, A4,...) und willst dann den Inhalt von Spalte E ausgeben. Versuch es ohne VBA in der Tabelle selbst und es sollte klappen.

 

[gerdle]

Ahh ok verstehe. kein Wunder hat das nicht funktioniert =P
Bin halt nicht so der Excel Profi........

Danke für eure Hilfe, es hat geklappt!

Gruß

 

[Scythe1988]

dann verwundert es mich, dass du den vba editor gefunden hast ;P

aber ist doch schön, dass es jetzt geht

€: btw brauchst du das D2 - D9 nicht mit $ feststellen dann hast du es einfacher, wenn neue zeilen hinzukommen. Einfach runterziehen und zack hast du die korrekte formel schon in der neuen zeile drinnen.

 

[gerdle]

ich klick mich halt irgendwie durch =P

danke für den tipp ;-)