Live-Forum - Die aktuellen Beiträge
Datum
Titel
09.10.2025 19:27:32
Ungewollter Zeilensprung beim Löschen einer Spalte
09.10.2025 17:12:32
Rechnen in Zeile nach Auswahl Dropdown
09.10.2025 16:26:10
Sortenreine LKWs Filtern
09.10.2025 13:43:40
Mittelwertwenn aus unterschiedlichen Tabellenblättern
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1476to1480
1476to1480
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

gefilterte Vorschläge anzeigen

Forumthread: gefilterte Vorschläge anzeigen

gefilterte Vorschläge anzeigen
17.02.2016 14:27:33
Meiky
Hallo liebes Forum,
ich bin gerade dabei eine Such/Filterfunktion zu basteln. Hierbei geht es darum, nach einer bestimmten Branche entweder nach Name und nach zugehöriger Nummer zu suchen.
Ich stelle mir das so vor, dass man in der Userform nach einem Schlagwort sucht z.B. "BAU" und alle Branchen die etwas mit "BAU" zu tun haben, im Tabellenblatt aufgelistet sind.
Ich bin schon fleißig am basteln und herumexperimentieren und habe jetzt eine Option gebaut, bei der ich alle zum Schlagwort passenden Branchen (leider) in der Userform aufgezeigt bekomme und dann EINE auswählen kann. Gerne hätte ich die Möglichkeit alle im Tabellenblatt anzuzeigen, so dass ich mich nicht auf eine festlegen muss.
Habt ihr hierzu vielleicht eine Idee. Ich komme leider nicht weiter.:/
Anbei meine Datei. Über Vorschläge bin ich euch dankbar.
https://www.herber.de/bbs/user/103636.xlsm
Liebe Grüße
Meiky

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: gefilterte Vorschläge anzeigen
17.02.2016 14:49:06
ChrisL
Hi Meiky
Ohne den Code jetzt komplett umzuschreiben, hier ein Vorschlag:
Sub Test()
Dim WS1 As Worksheet, WS2 As Worksheet
Dim Sp As String, iZeile As Integer
Dim i As Integer
Dim x As Integer
Application.ScreenUpdating = False
Set WS2 = Worksheets("RKZ_WKZ")
Set WS1 = Worksheets("Suche")
x = 0
cmbWKZ.Clear
WS1.Rows("3:1000").Delete
For i = 2 To 1000
If optText = True Then
Sp = "D"
ElseIf optWNR = True Then
Sp = "C"
End If
If Len(UCase(WS2.Range("D" & i).Value)) > 0 Then
If InStr(1, UCase(WS2.Range(Sp & i).Value), UCase(txtSuch)) Then
cmbWKZ.AddItem WS2.Range("a" & i).Value, x
cmbWKZ.List(x, 1) = WS2.Range("d" & i).Value
x = x + 1
WS1.Cells(x + 2, 2) = WS2.Cells(i, 1)
WS1.Cells(x + 2, 3) = WS2.Cells(i, 4)
End If
Else
GoTo ENDE
End If
Next
ENDE:
If cmbWKZ.ListCount = 1 Then
cmbWKZ.Enabled = True
cmbWKZ.ListIndex = 0
ElseIf cmbWKZ.ListCount > 1 Then
cmbWKZ.Enabled = True
cmbWKZ.DropDown
End If
Application.ScreenUpdating = True
End Sub

cu
Chris

Anzeige
AW: gefilterte Vorschläge anzeigen
17.02.2016 15:28:25
Meiky
Super. Vielen lieben Dank =) Genauso hatte ich es mir vorgestellt.
Mir ist gerade erst noch aufgefallen, dass gar nicht die passende Nummer zu der Branchenart gezogen wird. Sondern irgendwie eine andere Nummer... Hast du hier noch eine Idee, woran das liegen könnte?
Danke für deine Hilfe :)
Grüßle

Anzeige
AW: gefilterte Vorschläge anzeigen
17.02.2016 15:33:08
ChrisL
Hi
WS1.Cells(x + 2, 2) = WS2.Cells(i, 3)
anstelle von...
WS1.Cells(x + 2, 2) = WS2.Cells(i, 1)
cu
Chris

Danke !
17.02.2016 15:36:29
Meiky
you made my day ! Vielen Dank.
;

Forumthreads zu verwandten Themen

Gefilterte Dateien in txt exportieren
Gerhard

Namd zusammen
Gibt es eine Möglichkeit ausschliesslich gefilterte Dateien in eine txt Datei zu speichern?
Habe eine grosse Tabelle aus der ich nur einzelne Spalten (andere Spalten sind via VBA ausgeblendet) benötige und aus diesen noch sichtbaren Spalten via Autofilter nochmals eingren...
18.08.2008 21:35:19
Thread-ID: 1002746
4 Beiträge
Filtern, gefilterte Daten benutzen, Suchen und Aus
Merle


Hallo alle zusammen,
ich habe ein mittelschweres Problem. Und zwar habe ich hier ein Beispiel:
https://www.herber.de/bbs/user/55986.xls
In 'Tabelle1' sind ganz viele verschiedene Waren (C17:57) hinterlegt. Ich möchte nun, wenn ich eine dieser Waren rausfilter z.B H025, dass da...
13.10.2008 15:48:00
Thread-ID: 1016087
3 Beiträge
Nur gefilterte Zeilen in ein Textfeld übergeben
Heiko

Hallo an alle,
ich brauche ein wenig Hilfe. Ich bin gerade dabei aus einem ziemlich breiten (unübersichtlich geworden) Sheet die gewünschten Werte in eine Form (Textfeld) zu übergeben.
Ich bekomme es leider nicht hin, dass nur die gefilterten Zeilen im Textfeld erscheinen sollen.
Ic...
05.11.2008 19:59:37
Thread-ID: 1022076
7 Beiträge
Gefilterte Zeilen/ Spalten Kopieren
Falk

Hallo zusammen,
folgendes Problem für mich:
Ich filtere den Bereich von A1:CD1000. Der Filter wird je nach Anforderung auf verschiedene Spalten gesetzt.
In den Zellen von Spalte A befindet sich eine Formel, die den Blattnamen anzeigt wenn in Spalte D und F etwas eingetragen ist anso...
11.11.2008 10:13:33
Thread-ID: 1023442
3 Beiträge
Formel - Anzeige der gefilterten Inhalte
Rocky

Hallo Excelfreunde und zweiäugigen unter den Blinden und Einäugigen,
ich möchte gern einen dynamischen "Querfilter" basteln. Mein Ansatz bisher: Ich kopieren die Tabelle und transportiere diese. dann wird in jede Zelle folgende Formel geschrieben:
=WENN(INDIREKT(ADRESSE(SPALTE()+0;ZEILE...
28.11.2008 08:53:12
Thread-ID: 1028554
4 Beiträge
gefilterte Daten in Listbox einfügen
Larissa

Hallo,
ich möchte nur gefilterte daten in eine Listbox einlesen. Dieses Makro habe ich hier gefunden:
ClassModule: Artikel
Private Sub Worksheet_Calculate()
Dim iCounter As Integer
lstFilter.Clear
For iCounter = 2 To WorksheetFunction.CountA(Columns(1))
If Rows(iCoun...
17.01.2009 17:30:00
Thread-ID: 1040940
2 Beiträge
gefilterte Daten in Listbox einfügen
Larissa

Hallo,
ich bin mir nicht sicher, ob es richtig ist, dass ich einen neuen Thread aufmache, weil ich diese Frage schon für ein anderes Makro gestellt habe.
Jetzt komme ich an einer anderen Stelle nicht weiter. Auch mit dem folgenden Mako lese ich Daten aus einer Tabelle "Artikel" in eine...
18.01.2009 00:30:47
Thread-ID: 1041031
6 Beiträge
gefilterte Daten aus Listbox einlesen
Larissa

Hallo,
jetzt stecke ich wieder fest in meinem Userform.
Dank Eurer Hilfe habe ich jetzt geschafft, in der Listbox gefilterte Daten anzuzeigen.
Wenn man jetzt auf eine Eintragung in der Listbox klickt, sollen die Daten in Textfelder eingetragen werden.
Wenn die Daten nicht gefilt...
18.01.2009 19:19:00
Thread-ID: 1041237
11 Beiträge
ZÄHLENWENN mit gefilterten Daten
Wolfango

Hallo Experten,
folgendes:
In einer Spalte stehen Datumswerte. Diese Datumswerte werden mit folgender Formel ausgewertet:
ZÄHLENWENN(H9:H233;"<"&HEUTE()-29)
Das führt auch wunderbar zum gewünschten Resultat.
Ich möchte nun in der gleichen Spalte über den Autofilter...
30.01.2009 13:04:18
Thread-ID: 1045371
2 Beiträge
Selektieren gefilterter Datensätze, wie?
Werner

mein VBA-Level: befriedigend
Hallo Freunde,
wenn ich mit dem Auto-Filter, z.B. manuell, aus einer Menge von Datensätzen einen Teil herausgefiltert
habe und dann einen Teil der nach dem Filtern verbliebenen Zeilen markiere und kopieren will,
kopiert Excel offenbar immer die durch...
01.02.2009 09:32:39
Thread-ID: 1045837
5 Beiträge
Daten in gefilterten Bereich Kopieren
Sebastian

Hallo Forum,
vielleicht kann mir jemand bei meinem Problem helfen. Google konnte es nicht. :(
Ich habe ein Tabellenblatt mit gefilterten Daten. Nun möchte ich von einem anderen Tabellenblatt Daten neben die gefilterten, noch sichtbaren Daten kopieren. Excel lässt das leider nicht zu.
03.02.2009 15:19:09
Thread-ID: 1046691
2 Beiträge
ZÄHLENWENN mit gefilterten Daten?
Thomas

Hallo,
ich habe ein Problem. Ich habe ein Datenblatt mit 7 Spalten an Daten und um Häufigkeiten einzelner Daten in bestimmten Zeiträumen auszurechnen brauche ich die "ZÄHLENWENN" Funktion. Leider rechnet die mit allen Tabellendaten und nicht wie ich gehofft habe, nur mit den gefilterten Dat...
26.02.2009 15:47:33
Thread-ID: 1054438
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige