Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1740to1744
1740to1744
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wort suchen und Autofilter

Forumthread: Wort suchen und Autofilter

Wort suchen und Autofilter
16.02.2020 18:39:06
elmar
Hallo Experten,
mit dem unteren Code schaue ich, ob in Spalte "K" das Wort "sun" gefunden wird. Wenn das Wort sun vorhanden ist, dann werden die gefilterten Zeilen gelöscht, soweit auch alles gut.
Das Problem ist aber, wenn kein "sun" gefunden wird, dann löscht mir das Makro restlos alle Zeilen.
Wenn ich anders herum frage mit "if not Cells(i, 11)usw." klappt das auch nicht, weiß aber nicht weshalb.
For i = 2 To irow
If Cells(i, 11) = "Sun" Then ActiveSheet.Range("A1:U" & irow).AutoFilter Field:=11, Criteria1:="Sun"
Next i
Hat jemand einen Tipp für mich, wie ich verhindern kann, dass wenn das Wort "sun" fehlt, mir nicht alle Datensätze gelöscht werden.
VG
Elmar
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wort suchen und Autofilter
16.02.2020 18:55:23
Werner
Hallo,
so z.B.: 
If WorksheetFunction.CountIf(Columns(11), "Sun") > 0 Then
Range("A1:U" & irow).AutoFilter Field:=11, Criteria1:="Sun"
End If
Gruß Werner
AW: Wort suchen und Autofilter
16.02.2020 19:03:09
elmar
Hallo Werner,
super, bis dahin läuft das...
Wie bekommst Du das aber nun hin, dass er mir dann die gefilterten Zeilen ggf. löscht bzw. wenn "sun" nicht vorhanden ist, dann weiterläuft ohne irgendwas zu löschen?
Danke schon mal..
VG
Elmar
Anzeige
AW: Wort suchen und Autofilter
16.02.2020 19:15:52
Werner
Hallo,
na ich dachte den code zum löschen hast du schon.
Den mußt du doch nur ins If - End If packen, unterhalb der Codezeile mit der du filterst.
Gruß Werner
AW: Wort suchen und Autofilter
16.02.2020 19:20:30
elmar
So einfach, DANKE DIR für die schnelle Hilfe
Grüße
Elmar
Gerne u. Danke für die Rückmeldung. o.w.T.
16.02.2020 19:22:21
Werner
Anzeige
;

Forumthreads zu verwandten Themen

Wortteil suchen und in nebenstehende Zelle schreib
Roger

Hallo zusammen
Ich möchte gerne via VBA in Spalte A nach einem Wortteil suchen.
z.b. nach dem Teil stadt
Da würde dann in Spalte A stehen Burgstadt, Oberstadthofen etc.
Nun soll er wenn der z.b. in A3 diesen teil finden diesen Suchbegriff stadt in B3 einfügen. Zum suchen habe ic...
19.02.2015 08:31:52
Thread-ID: 1410262
24 Beiträge
Wortvergleich um gleichen Wortstamm zu finden
Kirk

Hallo Experten,
ich brauche mal wieder einen kleinen Tipp. Ich möchte gerne Wörter vergleichen,
z.b. Tisch, Tische, Tischs,
... und herausfinden, wenn der Wortstamm (Tisch..) gleich ist. Ich dacht an eine CODE mit LIKE, aber hier scheitere ich schon, weil mein VBA ?, # oder * gar...
22.02.2017 09:15:38
Thread-ID: 1543158
3 Beiträge
Bestimmtes Wort aus bestimmter Wortliste finden
mic

Guten Abend geehrte Forumsteilnehmer,
im Archiv habe ich keine Hilfe gefunden.
Darf ich bitte hier einmal meine Frage formulieren:
In den Feldern der Spalte A1:A3 stehen die Wörter
Kaffeesahne
Blumentopferde
Hammerhai
In der Spalte AA1:AA4 die Wörter:
Affe
B...
11.11.2018 15:14:35
Thread-ID: 1656797
6 Beiträge
Bestimmtes Wort im Text finden
Christian

Moin alle zusammen,
ich lasse über einen Excel File verschiedene Status Angaben übertragen. Um die Status Angaben zu vereinfachen möchte ich diese nach bestimmten Worten durchsuchen lassen. In diesem Fall wäre es der Begriff MACM. Die Status Angabe befindet sich in der Zelle N105
REL P...
13.11.2018 13:05:36
Thread-ID: 1657144
5 Beiträge
Erstes (bestimmtes) Wort in Zelle finden
Kerstin

Hallöchen, ich schon wieder...
Liege in den letzten Zügen meiner Tabelle und zu meinem Glück fehlt mir "nur" noch folgendes:
In Zelle A1 steht ein Text (kommt per VBA von einer anderen Tabellenseite). Dieser Text KANN mit einem Artikel (Bestimmt oder Unbestimmt) beginnen.
Wenn das e...
26.04.2019 10:43:51
Thread-ID: 1689230
7 Beiträge
Wort suchen welches mehrmals vorhanden
Tim

Hallo,
zurzeit lasse ich nach einem Wort in meinem Sheet suchen um deren Spalte als variable zu speichen.
Wie folgt:
Sub Find() Dim look1 As String Dim rng1 As Range Dim clmn1 As Long Dim sav1 As Range look1 = "open" Set rng1 = Cells.Find(look1) If Not rng1 Is Nothing Then clmn1 = r...
12.01.2021 11:24:04
Thread-ID: 1805200
9 Beiträge
Bestimmte Worte aus Text finden und als Wertung anzeigen
Tom
Hallo liebe Excel Profis, ich suche seit Tagen intensiv nach einer Lösung komme aber mit meinem Problem leider nicht alleine weiter.
Ich habe in A1 einen mehrere Sätze langen Text stehen.
Für Zelle B1 suche ich nach folgender Lösung:
Wenn A1 den Begriff Firma1 oder Firma2 oder Firma3 ent...
04.08.2023 14:10:43
Thread-ID: 1940594
18 Beiträge
Wort aus Zelle in Matrix suchen und anderen wert ausgeben
Nikolaus Pfusterschmid
Ich versuche in Tabelle A bei meiner Buchhaltung wiederkehrende Buchungen in einer Zelle zu finden die in einer anderen Tabelle stehen. Da sich in der Zelle immer eine Zahl mit dem Datum befinden kann, soll nur ein bestimmter Wortteil gesucht werden und dann der Text aus einer anderen Zelle ausgewor...
17.10.2023 11:58:53
Thread-ID: 1949907
8 Beiträge
Anzeige
Nur 1 Wort nach einem bestimmten wort in einer Zelleauslesen
MarkAntonius1
Hallo,

ich habe aus google Daten ausgelesen, die zum Beispiel wie folgt aussehen und in 1 Zelle im als Text mit Zeilenumbrüchen dargestellt sind:

facebook: https://www.facebook.com/barcamparivienna/
instagram: https://www.instagram.com/barcamparivienna/?hl=en
linkedin: http...
18.06.2024 16:29:04
Thread-ID: 1981593
17 Beiträge
Wort suchen in Matrix und entsprechende Spalte ausgeben
BastiFantasti
Hi,

ich brauche eure Hilfe. Ich möchte gerne in einer Matrix (oder auch Zeile) einen "Begriff" gezielt suchen und die ganze Spalte, wo er Begriff sich befindet, mit all seinen Werten wiedergeben.

Beispiel. Ich hab eine Tabelle, wo in einer Spalte "Versanddatum"steht. Jetzt möchte i...
17.09.2024 11:46:50
Thread-ID: 1991165
4 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Autofilter und Wortsuche in Excel effektiv nutzen

Schritt-für-Schritt-Anleitung

  1. Öffne Excel und lade die Datei, in der Du die Wortsuche durchführen möchtest.

  2. Öffne den VBA-Editor mit Alt + F11.

  3. Füge ein neues Modul hinzu: Rechtsklick auf „VBAProject“ > Einfügen > Modul.

  4. Kopiere folgenden Code in das Modul:

    Sub WortSuchenUndFiltern()
   Dim irow As Long
   Dim i As Long
   irow = Cells(Rows.Count, 11).End(xlUp).Row

   If WorksheetFunction.CountIf(Columns(11), "Sun") > 0 Then
       Range("A1:U" & irow).AutoFilter Field:=11, Criteria1:="Sun"
       ' Hier kannst Du den Code zum Löschen der gefilterten Zeilen hinzufügen
   End If
End Sub

  5. Schließe den VBA-Editor und gehe zurück zu Excel.

  6. Führe das Makro aus: Entwicklertools > Makros > Wähle „WortSuchenUndFiltern“ und klicke auf „Ausführen“.

Häufige Fehler und Lösungen

  • Alle Zeilen werden gelöscht: Stelle sicher, dass Du das Löschen der Zeilen nur innerhalb des If-Blocks durchführst, damit es nur passiert, wenn das Wort „Sun“ gefunden wurde.

  • Der Autofilter funktioniert nicht: Überprüfe, ob die Spalte mit den Daten korrekt angegeben ist (in diesem Fall Spalte K, also Field:=11).

Alternative Methoden

  • Filterfunktion verwenden: Du kannst auch die integrierte Filterfunktion in Excel nutzen, um manuell nach Wörtern zu suchen, ohne VBA zu verwenden. Wähle die Spalte aus und gehe zu „Daten“ > „Filter“.

  • Formeln verwenden: Nutze =SUCHEN("Sun";K2) in einer Hilfsspalte, um zu überprüfen, ob das Wort vorhanden ist.

Praktische Beispiele

  • Wort im Wort finden: Wenn Du nach einem bestimmten Wort suchst, kannst Du die Formel =WENNFEHLER(SUCHEN("sun";A1); 0) verwenden, um die Position des Wortes zu finden.

  • Wortteil herum: Um nach Wortteilen zu suchen, kannst Du Wildcards verwenden. Beispiel: =ZÄHLENWENN(K:K;"*sun*").

Tipps für Profis

  • Verwende die CountIf-Funktion: Diese Funktion ist sehr nützlich, um die Anzahl der Vorkommen eines bestimmten Wortes zu zählen, was Dir hilft, die Notwendigkeit einer Filterung besser zu erkennen.

  • Automatisiere den Prozess: Überlege, ob Du das Makro so erweitern kannst, dass es automatisch nach verschiedenen Wörtern sucht, anstatt nur nach „Sun“.

FAQ: Häufige Fragen

1. Wie kann ich nach einem Wortteil unterhalb 5 Buchstaben suchen?
Verwende die Funktion =LÄNGE(K2) < 5 in Kombination mit einer WENN-Abfrage, um nur die gewünschten Einträge anzuzeigen.

2. Wo finde ich hilfreiche Ressourcen zu Excel?
Eine gute Anlaufstelle ist www.wort-suchen.de, wo Du viele nützliche Hinweise und Anleitungen zu Excel finden kannst.

3. Was ist der Unterschied zwischen Autofilter und manueller Filterung?
Der Autofilter ermöglicht es Dir, Daten schnell zu filtern und zu sortieren, während die manuelle Filterung mehr Kontrolle über die spezifischen Kriterien bietet.

Beliebteste Forumthreads (12 Monate)

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