Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
24.04.2024 16:19:42
SummeWenn / SummeWenns mit Bedingung wenn kleiner als dann
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1708to1712
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1708to1712
1708to1712
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Dynamische Suche mit mehreren Kriterien

Dynamische Suche mit mehreren Kriterien
21.08.2019 16:01:11
Alex
Servus zusammen,
ich habe eine große Excelliste (A1:CA8700) und habe mir über eine Userform eine Suchfunktion gebaut.
Es gibt insgesamt 7 Suchfelder, die entsprechend in der Datei 7 Spalten durchsuchen.
Das Suchergebnis wird live/dynamisch in einer Listbox mit 7 Spalten entsprechend dargestellt.
Ich suche mit dem Standard Set rng = Range("F:F").Find(What:=...........)
Mit einer Suche ist das kein Problem und funktioniert alles.
Wenn ich in das 2. Feld was eingebe, wird das 1. Suchkriterium (logischerweise) übergangen und es wird nur nach dem 2. Suchkriterium angezeigt.
Problem:
Wie bekomme ich die 7 Suchkriterien alle miteinander verknüpft, dass nur die Kombination aus den Suchkriterien angezeigt werden?
Danke und Gruß
Alex

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dynamische Suche mit mehreren Kriterien
21.08.2019 16:35:39
Luschi
Hallo Alex,
ich mache das so:
- Set rng = Range("F:F").Find(What:=...........)
- anschließend überprüfe ich, ob in der selben Zeile des gefundenen Wertes in Spalte 'H'
  der Inhalt mit dem Wert aus dem 2. Suchkriterium übereinstimmt
  If rng.Offset(0, 2).value = '2. Suchkriterium' Then
- wenn nein einfach in Spalte 'F' mit FindNext weitersuchen
- wenn ja, dann wieder prüfen, ob der Inhalt der Spalte 'K' der selbe Zeile mit dem 3. Suchkriterium
  übereinstimmt usw.
- Sollte es eine Fundstellte in Spalte 'F' geben, bei der auch die anderen 6 Bedingungen der
  entsprechen den Zeile passen, dann diese ZeilenNr. merken
Also nur einen Find-Befehl mit den entsprechenden FindNext, der Rest sind If-Abfragen.
Gruß von Luschi
aus klein-Paris
Anzeige
AW: Dynamische Suche mit mehreren Kriterien
21.08.2019 17:02:52
Daniel
Hi
1. schreibe den Inhalt der Textfelder in 7 Zellen. Entweder über die Eigenschaft ControlSource oder wenns schneller gehen soll per Code im Change-Event der jeweiligen Textbox
2. füge der Tabelle eine Hilfsspalte hinzu mit folgender Formel (schematisch) 
=Oder(ZelleText1="";ZelleText1=F1)+Oder(ZelleText2="";ZelleText2=H1)+usw für alle 7 Textzellen
je nachdem welchen Übereinstimmungstyp du haben willst, kannst du das ZelleText1=F1 noch variieren:
a) genaue Übereinstimmung: ZelleText1 = F1
b) immer mit Enthält, Groß-Kleinscheibung beachtent: IstZahl(Finden(ZelleText1;F1)
c) immer mit Enthält, ohne Groß-Kleinschreibung: IstZahl(Suchen(ZelleText1;F1)
d) Anwender soll über Joker die Suchart bestimmen können: ZählenWenn(F1;ZelleText1)
3. für die Befüllung deiner Listbox musst du dann nur noch diese zusätzliche Hilfsspalte nach dem Wert 7 durchsuchenn
Gruß Daniel
Anzeige
AW: Dynamische Suche mit mehreren Kriterien
22.08.2019 11:43:26
Alex
Servus zusammen,
Luschi deine Lösung wird nicht funktionieren oder es wird ein Monstercode.
Es gibt 7 Suchfelder, aber es gibt keine feste Suchreihenfolge. Ich kann also erst in das Suchfeld 5 was eingeben, dann bei 2 und dann wieder was bei 7.
Daniel, deine Lösung habe ich nicht so ganz verstanden...
Am einfachsten wäre es doch, dass ich nach dem ersten Suchergebnis - was dann in der Listbox steht - in der Listbox suche und nicht mehr in der Tabelle.
Analog der andere Suche müsste ich dann analog mind. 3 Buchstaben im 2. Suchfeld eingeben und der sucht in der Listbox und schmeoßt alle Einträge raus, die nicht passen.
Ist das Möglich?
Anbei mein Code für das 1. Suchfeld:
Private Sub TextBox2_Change()
Dim rng As Range
Dim sAddress As String
Dim ZSuche As Integer
ListBox1.Clear
If TextBox2 = "" Or TextBox2 = " " Or Len(TextBox2)
P.S.: Spalte 8 der Listbox dient nur dazu mit einem Doppelklick in die entsprechende Zeile zu springen.
Danke und Gruß
Alex
Anzeige
AW: Dynamische Suche mit mehreren Kriterien
23.08.2019 11:11:18
Luschi
Hallo Alex,
Deine Kritik ist angebracht, aber ohne Demodatei rühre ich da keinen Finger. Habe verstanden, was Du willst, aber das ist doch ein bißchen mehr als nur helfen:
- denn bei jedem! verändern der Filterbedingungen in irgend einem Suchfeld müssen die anderen
  6 Kriterienfelder neu angepaßt werden
- es dürfen dann nur noch die Infos in den restlichen Auswahlfeldern stehen, die noch möglich sind
- das ist aber über die normale Vba-Programmierung sehr aufwendig
- ich verwende dazu die Datenbankfunktionalität von ADODB, also SQL-Code, der auch in Excel-Vba funktioniert.
Gruß von Luschi
aus klein-Paris
Anzeige

257 Forumthreads zu ähnlichen Themen

Summwenn mit mehreren Arbeitsblaettern/Kriterien
Alex

Hallo @ all
Ich habe mal wieder ein Problem:
Ich habe die Arbeitsblaetter 1-31 und moechte von dort jeweils die Werte aus den Zellen G2:G32 summieren wenn Die Zellen A und B jeweils eine entsprechende Bedingung erfuellen.
Bisher arbeitete ich nur mit einer Bedingung in den Zellen de...
12.08.2008 13:20:00
Thread-ID: 1001177
4 Beiträge
Anzeige
Suche in Text mit mehreren Suchkriterien
Christian

Hallo Forum,
ich möchte prüfen, ob ein Text mindestens einen Text aus einer Liste enthält.
Bsp: enthält der Text
"das ist die Liste der gelieferten Früchte: Apfel, Birnen"
einen der Texte enthält:
"Banane", "Kirsche", "Birnen"
in dem Fall ja. Ich brauche keine Position...
14.01.2009 11:32:00
Thread-ID: 1039544
10 Beiträge
Suchen mit 3 Kriterien
Schmidt

Hallo zusammen
Ich habe eine Tabelle , in der ich mit 3 Suchkriterien einen Wert errechnen möchte.
Mit Sverweis und der WENN-Funktion konnte ich das Problem nicht lösen. Könnte mir bitte jemand hilfreich zur Seite stehen.
https://www.herber.de/bbs/user/58658.xls
21.01.2009 14:41:00
Thread-ID: 1042200
7 Beiträge
Anzeige
Formel ZählenWenn mit mehreren Kriterien
werner71

Hallo zusammen,
vielleicht kann mir jemand mit einer Formel weiterhelfen, bei mir klappt es nicht so wie es soll:
Zur Erklärung: In einer Liste befinden sich der Name, der Beruf und die Arbeitszeiten des jeweiligen Arbeiters.
In den daneben stehenden Spalten werden im Viertelstunden...
29.03.2009 10:49:51
Thread-ID: 1065013
5 Beiträge
summe unter 2 bedingungen mit mehreren kriterien
johanens

Hallo zusammen,
ich verzweifle schon seit dem wochenende an folgender Rechenoperation in Excel

Bei dieser Tabelle möchte ich nun die ANZAHL aller Schuhe von Marke B UND C, die die Größe 32 UND 44 haben, zusammengerechnet haben.
Hat jemand eine Idee wie ich das umsetzen kann?
30.03.2009 12:34:24
Thread-ID: 1065231
5 Beiträge
Zählen wenn mit mehreren Kriterien
Flo

Hall zusammen,
gibt es eine Möglichkeit Zählenwenn mit mehreren Kriterien zu verwenden.
Ich habe eine Liste mit Namen; Städten; Verkausfzahlen und ich möchte die Summe der Verkaufszahlen erhalten wenn ein bestimmter Name und eine bestimmt Stadt übereinstimmen.
Also z.b. Hans; Münche...
30.04.2009 15:08:40
Thread-ID: 1072203
7 Beiträge
Funktion SUCHEN o.ä. mit mehreren Suchbegriffen
Nico

Morjen,
sacht mal, was ist an der Syntax falsch? Ich will eine Zelle nach mehreren Begriffen durchsuchen und wenn einer dieser Begriffe enthalten ist, soll der Inhalt der Zelle ausgegeben werden.
Folgende Syntax verwende ich bisher für den Teil der Funktion SUCHEN:
=Wenn(Oder(Suchen...
19.05.2009 09:17:25
Thread-ID: 1076059
8 Beiträge
Summe aus einer Tabelle mit mehreren Kriterien
Erik

Hallo zusammen,
momentan verzweifel ich an einem Problem in Excel.
Die Tabelle hat das folgende Format
Europe: 1 = Ja und 0 = nein
Europe Type Size Price
1 x S 19
1 y L 145
0 x S 291<...
10.06.2009 13:50:10
Thread-ID: 1080478
4 Beiträge
Anzeige

Links zu Excel-Dialogen

ListBox TextBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
1
9
6
2
4
4
6
7
3
1
4
2
2
14
2
4
2
4
4
4
9
2
11
11