Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
VBA Suchfunktion mit mehreren Kriterien
zurück: PasteSpecial bei .range/Destination weiter: Zelle löschen, wenn Nachbarzelle Markierung gesetzt Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
derHorst
Im Profil kannst Du frei den Rang ändern


Verfasst am:
27. Feb 2012, 12:58
Rufname:

VBA Suchfunktion mit mehreren Kriterien - VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

hallo
ich bins mal wieder
mit einem neuen Problem.
ich würde gerne in einer Tabell eine Suche durchführen
bei der ich mehrere Kriterien gleichzeitig berücksichtigen
möchte.
Gibt es da eine Funktion die die Zeile einer Tabelle findet in der
3 oder 4 Kriterien stimmen.
Wäre schön wenn mir jemand helfen könnte
vielen Dank schon einmal.
euer Horstie
slowboarder
Im Profil kannst Du frei den Rang ändern


Verfasst am:
27. Feb 2012, 13:04
Rufname:


AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

Hi
konkret ist da schwer was zu zu sagen, da wir deine Kriterien nicht kennen, aber prinzipell ist für sowas der Autofilter oder Spezialfilter gut geeignet.
Gruß Daniel
derHorst
Im Profil kannst Du frei den Rang ändern


Verfasst am:
27. Feb 2012, 13:07
Rufname:

AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

hi daniel
meine kriterien sin drei zahlen und ein String
nur wenn diese in einer Zeile alle vorkommen, dann soll die zeile berücksichtigt werden
horstie
derHorst
Im Profil kannst Du frei den Rang ändern


Verfasst am:
27. Feb 2012, 14:35
Rufname:

AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

Hallo noch mal,
ich würde die Suche gern mit einem Makro machen und nicht mit dem Suchfilter
hat da jemand eine Idee.
Danke
slowboarder
Im Profil kannst Du frei den Rang ändern


Verfasst am:
27. Feb 2012, 14:55
Rufname:


AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

HI
Makro und Verwendung des Filters schließen sich ja nicht gegenseitig aus.
eine andere einfache Methode wäre bei komplexeren Bedingungen, eine Formel zu schreiben, die WAHR wird, wenn die Bedingungen für die Zeile zutreffen und FALSCH wenn nicht. Dann schreibt man diese Formel in eine Hilfsspalte (geht auch per VBA) und muss dann nur noch nach WAHR suchen oder eben wieder den Autofilter bemühen.

in deinem Fall liegt der Schlüssel zur Lösung wahrscheinlich in der ZählenWenn-funtktion:
=Und(ZählenWenn(A1:Z1;1);ZählenWenn(A1:Z1;2);ZählenWenn(A1:Z1;3);ZählenWenn(A1:Z1;"Text1"))

In Formeln, die Wahrheitswerte erfordern, wird der Wert 0 als FALSCH und Werte <> 0 als WAHR interpretiert

Gruß, Daniel
Phelan XLPH
Fortgeschritten


Verfasst am:
27. Feb 2012, 15:04
Rufname: Phelan

AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

@derHorst,

mach mal ein Beispiel, damit wir aus dem Irrgarten rauskommen.

_________________
Was vorstellbar ist, ist auch machbar. - Albert Einstein
derHorst
Im Profil kannst Du frei den Rang ändern


Verfasst am:
27. Feb 2012, 15:17
Rufname:

AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

Vielen Dank erst mal
so richtig werde ich aus der Formel noch nicht schlau aber ich versuche es noch mal mein Problem klar zu machen.
Ich habe eine Tabelle mit vielen Zeilen 3 Spalten haben Zahlen und eine einen String. die übrigen Spalten sind nicht wichtig.
Ich möchte genau die Zeilen finden, in denen die drei Zahlen und der String steht.
Mein Notfallplan wäre es nach dem ersten Kriterium zu suchen alle Zeilennummern in eine extra Spalte zu schreiben und dann in diesen Zeilen das nächste zu suchen und wiederum diese Zeilen in eine Spaltezu schreiben und das dritte...
Ich hätte es aber gerne ohne Zwischenspeicher
so in etwa:
Range("A1:E32000").Find(what:=12, 23, 34, "hallo")
tschau Horst
slowboarder
Im Profil kannst Du frei den Rang ändern


Verfasst am:
27. Feb 2012, 15:23
Rufname:

AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

HI
wenn du beispielsweise nach der 12 sucht, muss die dann in einer bestimmtn Spalte stehen oder ist es egal, in welcher von den 3 Zahlenspalten die 12 steht?

Gruß Daniel
derHorst
Im Profil kannst Du frei den Rang ändern


Verfasst am:
27. Feb 2012, 15:38
Rufname:

AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

wenn möglich würde ich auch jedes Kriterium in einer bestimmten Spalte suchen
erste Zahl --> Spalte A
zweite Zahl --> Spalte B
dritte Zahl --> Spalte C
String --> Spalte D
slowboarder
Im Profil kannst Du frei den Rang ändern


Verfasst am:
27. Feb 2012, 15:44
Rufname:

AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

Hi
ja, dann einfach für jede Spalte den Autofilter entsprechend setzen und sichtbar bleiben die Zeilen, für die die Bedingung zutrift.
Der Recorder hilft dir, die Makrobefehle für die Aktivierung des Autofilters rauszufinden.
Gruß Daniel
Grüßli
joo mei, 's langt


Verfasst am:
28. Feb 2012, 14:35
Rufname:

AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

Hi,

schau dir mal die Datei an. Zur Zeit sind hier 2 Suchkriterien pro Zeile.
Du kannst aber soviele SuchKriterien implementieren, wie du willst.
Dazu mußt du dann in der Sub Mehrfachsuche...

If Len(UF.TextBox1.Value) Then objDic.Add 1, UF.TextBox1.Value
.....

um weitere Suchbegriffe ergänzen

und am Schluß ist die auskommentierte Variation der Mehrfachsuche für die Suche in Spalten

Grüßli

_________________
eine Weisheit aus der "Funkerei", die ich auch immer anwenden sollte ( frommer Wunsch ):"erst denken, dann drücken, dann sprechen!"



max3001.xls
 Beschreibung:

Download
 Dateiname:  max3001.xls
 Dateigröße:  65.5 KB
 Heruntergeladen:  557 mal

Medjai
Im Profil kannst Du frei den Rang ändern


Verfasst am:
22. Jul 2012, 16:22
Rufname:

AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

Hallo!

Ich habe diesen Beitrag aufgegriffen weil die Exceldatei im Grunde genau das macht was ich brauche. In meinem Fall gibts da aber ein Problem. Eine Spalte in der Tabelle beinhaltet Datumsangaben und ich brauche ein drittes Suchkriterium mit Datum von... bis...

Weiß jemand ob sowas geht?

mfg
BigT42
Gast


Verfasst am:
17. März 2014, 11:20
Rufname:

AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2010

Hi Grüßli,

Deine Suchfunktion ist grandios, konnte sie auch problemlos auf 8 Suchkriterien erweitern.

Aber: Die Suche läuft momentan "Case Sensitive"! Wie kann ich die Suche durchführen lassen, so dass sie die Treffer unabhängig von Groß- und Kleinschreibung liefert?

Beste Grüße,
Thomas
Grüßli
joo mei, 's langt


Verfasst am:
17. März 2014, 14:06
Rufname:

AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

Hi,

danke fürs Kompliment, muss zu meiner Schande aber gestehen, dass der wesentliche Ideengeber in meiner Erinnerung CASE ist. Ich habe nur modifiziert Rolling Eyes

dazu mußt du in der Funktion Suchmich in folgender Zeile

Code:
If CStr(arSrc(i, k)) Like "*" & objDic(varItem) & "*" Then


beide "Begriffe" entweder klein- oder GROSS- schreiben, also mit Ucase oder Lcase casten

If Lcase(CStr(arSrc(i, k))) Like "*" & Lcase(objDic(varItem)) & "*" Then


Grüßli

_________________
eine Weisheit aus der "Funkerei", die ich auch immer anwenden sollte ( frommer Wunsch ):"erst denken, dann drücken, dann sprechen!"
BigT42
Neuling


Verfasst am:
17. März 2014, 18:09
Rufname:


AW: VBA Suchfunktion mit mehreren Kriterien - AW: VBA Suchfunktion mit mehreren Kriterien

Nach oben
       Version: Office 2007

Richtig, richtig gut ... funktioniert bestens und rundet die Funktion perfekt ab!

Vielen, vielen Dank und beste Grüße ...

Thomas
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Probleme bei Zählenwenn mit mehreren Kriterien 5 danrei 4611 01. Nov 2005, 15:17
danrei Probleme bei Zählenwenn mit mehreren Kriterien
Keine neuen Beiträge Excel Formeln: sverweis (?) bei 2 Kriterien 16 Andre1977 10809 27. Okt 2005, 18:05
uA-ch sverweis (?) bei 2 Kriterien
Keine neuen Beiträge Excel Formeln: WENN ... DANN mit mehreren Abfragen 1 RChristian078 979 14. Jul 2005, 15:58
ae WENN ... DANN mit mehreren Abfragen
Keine neuen Beiträge Excel Formeln: Summewenn mit mehreren Suchkriterien 5 TC82 2320 16. Jun 2005, 11:16
ae Summewenn mit mehreren Suchkriterien
Keine neuen Beiträge Excel Formeln: Excel Problem: kopieren von mehreren Werten aus vielen Zeile 7 Darwin 972 04. Mai 2005, 07:59
Darwin Excel Problem: kopieren von mehreren Werten aus vielen Zeile
Keine neuen Beiträge Excel Formeln: Verknüpfung mit mehreren Tabellenblättern 1 Gast 1275 06. Apr 2005, 18:38
Hübi Verknüpfung mit mehreren Tabellenblättern
Keine neuen Beiträge Excel Formeln: Suchfunktion im Excel 8 McBrumm 8297 04. Apr 2005, 17:00
McBrumm Suchfunktion im Excel
Keine neuen Beiträge Excel Formeln: aus mehreren spalten einespalte?? 8 fredd 1182 15. März 2005, 19:33
fredd aus mehreren spalten einespalte??
Keine neuen Beiträge Excel Formeln: Werte aus einer Tabelle nach mehreren Kriterien auswerten 3 Daniel 2901 07. März 2005, 14:15
Hübi Werte aus einer Tabelle nach mehreren Kriterien auswerten
Keine neuen Beiträge Excel Formeln: SVERWEIS - NACH 2 KRITERIEN GLEICHZEITIG SUCHEN 6 janine071108 3121 21. Feb 2005, 17:55
Arnim SVERWEIS - NACH 2 KRITERIEN GLEICHZEITIG SUCHEN
Keine neuen Beiträge Excel Formeln: abfrage gestalten mit mehreren bedingungen 3 Gast 1303 15. Dez 2004, 16:58
nugget abfrage gestalten mit mehreren bedingungen
Keine neuen Beiträge Excel Formeln: Erster Wert aus mehreren Spalten 4 Gast 1922 03. Dez 2004, 10:52
Arnim Erster Wert aus mehreren Spalten
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Expression Web Forum