Sverweis mit mehreren Suchkriterien und Ergebnisse

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Werner,
Tut mir leid, du hast recht ich habe vergessen zu erwähnen, dass ich wirklich nur die genauen Treffer übertragen will. also nur die Fälle in denen beide Suchkriterien zutreffen..
Ich habe es bereits mit einem Sverweis versucht der etwas umgeschrieben wurde und habe versucht diesen dann auf 2 Kriterien zu beziehen. Klappt aber auch nicht so ganz...
Hier ist der umgeschriebene Sverweis:

Public Function SVERWEIS2(Kriterium As String, _ Bereich As Range, _ SuchSpalte As Integer, _ ErgebnisSpalte As Integer, _ Optional Unikate As Boolean = True, _ Optional Trenner As String = ", ") As String 'Autor: Ransi Dim arrTmp Dim L As Long Dim Mydic As Object arrTmp = Bereich Set Mydic = CreateObject("Scripting.Dictionary") If Unikate = True Then For L = 1 To UBound(arrTmp) If arrTmp(L, SuchSpalte) = Kriterium Then Mydic(arrTmp(L, ErgebnisSpalte)) = 0 Next SVERWEIS2 = Join(Mydic.keys, Trenner) Else: For L = 1 To UBound(arrTmp) If arrTmp(L, SuchSpalte) = Kriterium Then Mydic(L) = arrTmp(L, ErgebnisSpalte) Next SVERWEIS2 = Join(Mydic.items, Trenner)
End If End Function

Den habe ich dann in der Syntax so angewendet um die 2 Kriterien abzudecken:

=SVERWEIS2(Suchkriterium1;WENN(Suchspalte2=Suchkriterium2;Suchmatrix;);Suchspalte1;Ergebnisspalte; Wahr;"/")

Das ganze klappt aber leider nicht..Ich kriege ständig die Fehlermeldung"#WERT!".
Entschuldige nochmals die falsche Ausweisung meines Threads.
Grüße, Rene

HI
mit Zählenwenns markieren und dann löschen.
wenns von der Datenmenge her zuviel für Zählenwenns ist, dann:
per Formel Vorgangsnummer und Artikelnummer zu einem Begriff zusammenfassen
Tabelle nach diesem Zusammengefassten Suchbegriff sortieren.
Per SVerweis mit 4. Parameter = Wahr überprüfen, ob der Suchbegriff in der anderen Tabelle vorhanden ist (Suchwert = Rückgabewert).
Zum löschen eine Formel in einer Hilfsspalte erstellen, die die Werte die gelöscht werden müssen mit 0 markiert und die die stehenbleiben müssen mit der aktuellen Zeilennummer.
Dann mit Duplikate-Entfernen die Zeilen mit 0 löschen (in die Überschriftenzeile der Hilfsspalte kommt ebenfalls die 0)
Wenn man das Prinzip mal verstanden hat, hat man auch ohne Makro die grössten Listen im Griff und kann sie schnell bearbeiten und zusammenfassen.
Makro ist dann nur notwendig, wenn eine wiederholte Bearbeitung erforderlich ist.
dieses Makro ist dann aber relativ einfach erstellt, weil man ja nur noch diese Schritte nachprogrammieren muss und man dabei vom Recorder unterstützt wird.
Gruß Daniel

Beliebteste Forumthreads (12 Monate)

Sverweis mit mehreren Suchkriterien und Ergebnisse

16
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

357 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Sverweis mit mehreren Suchkriterien und Ergebnisse

16 Beiträge zum Forumthread Beiträge zu diesem Forumthread

357 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

16
Beiträge zum Forumthread

Beiträge zu diesem Forumthread