Thema Datum  Von Nutzer Rating
Antwort
Rot Sverweis mit 2 Suchkriterien ohne Hilfsspalte
 29.01.2017 22:29:49 Kai
NotSolved

Ansicht des Beitrags:
Von:
Kai		 Datum:
29.01.2017 22:29:49		 Views:
1093		 Rating:
     
Antwort:
  Ja
Thema:
Sverweis mit 2 Suchkriterien ohne Hilfsspalte

Hallo zusammen,

ich würde gerne einen Sverweis machen mit 2 Suchkriterien, die Argumente befinden sich in Spalte A und B, die Matrix geht bis J hinterher.

Ich habe mir bisher Abhilfe damit geschaffen das ich die eigentlichen Kriterien verkette und das Ergebnis durch eine als einfachen Sverweis mit Hilfe einer Hilfsspalte ausgeben lasse. Ich möchte aber ohne die Hilfsspalte auskommen da ich diese sonst immer Pflegen muss.

Kriterium 1: = "EKSG" in der Eingabe besteht der String aus 3 Zahlen einem "-" und einem Text Bsp.: "112 - Bier", für die Suche brauche ich hinterher nur die 3 Zahlen deswegen folgt nach dem Auslesen des wertes eine TextToColumns Funktion

Kriterium 2: = liefkto wird aus der Zelle "C3" ausgelesen

?
1
2
3
4
5
6
7
8
9
10
11
eksgnr = Workbooks("Artikelpass.xlsm").Worksheets("Tabelle1").Range("C7").Value
Sheets("Tabelle3").Range("C7") = eksgnr
    Workbooks("Artikelpass.xlsm").Worksheets("Tabelle3").Range("C7").TextToColumns, _
        Destination:=Workbooks("Artikelpass.xlsm").Worksheets("Tabelle3").Range("C8"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar _
        :="-", FieldInfo:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True
vlID = liefkto & Workbooks("Artikelpass.xlsm").Worksheets("Tabelle3").Range("C8").Value
 
 
Kann mir da jemand bitte helfen?

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:
WYSIWYG-Editor, ctl00_Content_editor1



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Sverweis mit 2 Suchkriterien ohne Hilfsspalte
 29.01.2017 22:29:49 Kai
NotSolved