Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
696to700
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
696to700
696to700
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Autofilter und Inputbox

Autofilter und Inputbox
22.11.2005 16:24:21
Carsten
Hallo,
ich habe ein kleines Problem. Ich habe eine Excel-Tabelle, in der ich Daten filtern möchte. Das soll über ein Makro mit Inputbox geschehen. Da die Schreibweise in der Tabelle aber teilweise unterschiedlich ist, soll nicht der gesamte Suchbegriff in der Inputbox erfasst werden, sondern nur ein Ausschnitt.
Beispiel: in der Tabellle gibt es Einträge wie Willi Schulz, W. Schulz oder W Schulz. Ich möchte in der Inputbox nur Schulz eingeben.
Wie bekomme ich das hin? Es sollte also möglichst benutzerdefiniert gesucht werden mit der Vorgabe "enthält".
Kann mir hier jemand helfen?
Danke
Carsten

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Autofilter und Inputbox
23.11.2005 01:35:23
Franz
Hallo Carsten,
so könnte z.b. das entsprechende Makro aussehen:

Sub AutofilterEingabe()
Dim Kriterium1 As String, Bereich As Range
Set Bereich = ActiveSheet.UsedRange 'Bereich entsprechend anpassen
'Filter sucht nach "enthält Suchtext"
Kriterium1 = "=*" & InputBox("gesuchter Text? ", "Autofilter Suchbegriff", "Suchtext") & "*"
If Kriterium1 = "=**" Then Exit Sub
Bereich.AutoFilter Field:=1, Criteria1:=Kriterium1 'Falls mehrere Spalten ein Autofilter haben, dann ggf. Fieldnummer anpassen
End Sub

Gruß
Franz
AW: Autofilter und Inputbox
23.11.2005 07:54:47
Carsten
Hallo Franz,
es funktioniert. Vielen Dank!
Gruß
Carsten
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige