Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 12:46:38
Nutzereingaben Speichern und Laden
26.04.2024 11:49:48
VAB und Bedingte Formatierung nimmt die Farbe im Makro nicht
26.04.2024 11:38:46
Acrobat PDF Formularfelder mit Excel ausfüllen
26.04.2024 11:23:04
zählen wenn - aber nur die selektierten Zeilen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1872to1876
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
1872to1876
1872to1876
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Daten in Array einlesen und Filtern

Daten in Array einlesen und Filtern
18.03.2022 14:19:46
David
Hallo,
ich möchte Daten in einen Array einlesen, darin nach bestimmten Kriterien filtern und die gefunden Datensätze wieder ausgeben.
Das Einlesen in den Array klappt schon mal:
ich bekomme es aber partout nicht hin diese Daten nun zu filtern und wieder auszugeben.
Die Rohdaten im Array bestehen aus 3 Spalten und 3 Zeilen
Land, Datum, Anzahl
DE, 01.03.2022, 5
CH, 10.10.2022, 10
AT, 17.10.2022,15
Jetzt soll beispielsweise nach den Daten mit Datum größer als 05.10.2022 und Land = AT gefiltert werden und diese wieder ausgegeben werden.
Kann mir das jemand im Code ergänzen? Anbei die kleine Testdatei
https://www.herber.de/bbs/user/151843.xlsm
Vielen Dank für die Hilfe
David

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten in Array einlesen und Filtern
18.03.2022 14:35:38
Daniel
Hi
Filtern in einem 2-Array kenne ich nicht.
Ich würde per Schleife die Werte in ein neues Array übertragen und dabei die unerwünschten überspringen:
wenns einen nicht stört, dass das neue Array am Ende leere Zeilen hat, einfach so:

dim zK as long, zG as long, s as long
arrKomplett = hier Wertzuweisung aus der Tabelle
redim arrGefiltert(1 to ubound(arrKomplett, 1), 1 to Ubound(arrKomplett, 2))
for zK = 1 to ubound(arrKomplett, 1)
if arrKomplett(zK, 1) = "CH" AND arrKomplett(zK, 2) > CDate("05.10.2022") then
zG = zG + 1
for s = 1 to ubound(arrKomplett, 2)
arrGefiltert(zG, s) = arrKomplett(zK, s)
next s
end if
next zK
wenn das Array genau passend groß sein soll, müsstest du die Anzahl der Zeilen vorab ermitteln und entsprechend dimensionieren:
also

Redim arrGefiltert(1 to Worksheetfunction.CountIF(Columns(1), "CH", Columns(2), ">" & Clng(Cdate("05.10.2022"))), 1 to ubound(arrKomplett, 2))
denn nachträgliches redimensionieren ohne Datenverlust geht nur bei Spalten, aber nicht bei Zeilen
Gruß Daniel
Anzeige
AW: Daten in Array einlesen und Filtern
18.03.2022 14:55:20
David
Hallo Daniel,
danke für die schnelle Antwort. Dann habe ich mir das mit dem Filtern falsch vorgestellt. Aber deine Lösung würde mir auch passen.
Noch zwei Fragen. Wo im Code müsste dann die Zeile hin, damit der neue Array passend dimensioniert wird? Ich habe da versucht vor deinen Code zu bauen, dann kommt aber die Fehlermeldung: Falsche Anzahl an Argumenten oder ungültige Zuweisung zu einer Eigenschaft.
Und wie kann ich den neuen Array dann wieder ausgeben?
Danke. Ich habe noch nie mit Arrays gearbeitet.
David
AW: Daten in Array einlesen und Filtern
18.03.2022 16:00:29
Daniel
naja, im Code steht doch drin, wo das Array auf größe gebracht wird, in der Zeile, die mit ReDim beginnt.
da darfst du für die Anzahl der Zeilen nicht die Anzahl der Zeilen des Ausgangsarrys nehmen (Ubound(arr, 1)) sondern musst dafür ermitteln, wieviele Zeilen sich aus deinen Filterkriterien ergeben.
Dazu kann man ZählenWenns verwenden (muss im Code also auch CountIFs heißen und nicht CountIf)
Gruß Daniel
Anzeige

300 Forumthreads zu ähnlichen Themen

Filtern und Summieren bzw. Sortieren
Stephan

Hallo liebe Excel - VBA-Freunde,
ich habe ein ziemlich großes Problem. Aber vielleicht kann mir jemand von euch dabei helfen.
Habe das Problem, dass in Spalte A verschiedene Auftragsnummern existieren und einige davon mehrmals vorkommen. Nun möchte ich durch ein Makro so filtern, dass j...
16.10.2008 16:02:00
Thread-ID: 1016903
3 Beiträge
Anzeige
Filter-Makro funktioniert nicht
Wolfango

Hallo Experten,
die Spalte Q einer Datenbank enthält Datumswerte.
Wenn ich nun einen benutzerdefinierten Filter (vorher Autofilter aktiviert) setze mit den Kriterien "ist kleiner oder gleich" "31.12.2008" funktioniert das einwandfrei. Die gesuchten Werte werden wie gewünscht angezeigt...
04.11.2008 10:28:00
Thread-ID: 1021496
8 Beiträge
Wenn-Oder Formel über VBA funktioniert nicht
sharky1000

Hallo,
ich habe eine etwas komplexere Wenn-Oder Formel erstellt, welche ich über VBA in eine Zelle einfügen möchte.
Formel in E2:
=WENN(ODER(LINKS(D2;2)="M1";LINKS(D2;2)="M2";LINKS(D2;2)="M3";LINKS(D2;2)="M4";LINKS(D2;2)="M5"); LINKS(D2;1);WENN(LINKS(D2;2)="NM";LINKS(D2;2);WENN(LIN...
06.11.2008 14:11:01
Thread-ID: 1022285
7 Beiträge
Anzeige
Leere Filtern funktioniert nicht - wo Fehler?
Wolfgang

Hallo,
der nachstehende Code bewirkt ein Filtern über 16 Spalten bzw. Boxes; Ich würde ihn gerne, wie im Autofilter, ergänzen um (Leere), (Nichtleere) und (Alle). Ich habe, nach Hinweisen auf dem Forum, vor geraumer Zeit den Code versucht, anzupassen. Irgendwie ist aber noch ein Fehler dar...
04.12.2008 18:50:00
Thread-ID: 1030277
4 Beiträge
Autofilter über Makro funktioniert nicht mehr
Ramon

Hallo Excel-Freunde,
ich habe ein ganz komisches Problem:
Wenn ich im Makro die Autofilter-Funktion einbinde, wird beim ausführen des entsprechenden
Makros in dem Modul der Begriff "Autofilter" gelb markiert, mit der Fehlermeldung:
"Fehler beim kompilieren:
Methode oder Date...
23.01.2009 15:01:21
Thread-ID: 1043020
3 Beiträge
Zahlenwerte filtern und sortieren ?
Günther

Hallo zusammen,
ich hab dieses Problem:
In den Zellen B1:Z51 stehen diverse Zahlenwerte.
Diese Werte sollen in Spalte A ab A1 sortiert von klein nach groß aufgeführt werden,
jedoch jeder Zahlenwert nur einmal.
Vielen Dank im vorraus.
Gruß Günther
17.02.2009 14:25:00
Thread-ID: 1051486
3 Beiträge
Kopieren von Formeln in Excel funktioniert nicht
Formeln

Hallo Leute,
ich kann seit heute keine Formeln mehr in Excel von einer Datei in eine andere Dateien kopieren. Excel übernimmt nur die Werte. Kopieren in einer Datei zwischen zwei Tabellenblättern funktioniert.
Habe nichts verstellt. Automatische Berechnung ist eingestellt.
Weiß jem...
30.06.2009 13:38:40
Thread-ID: 1085354
8 Beiträge
Wenn Und Funktion mit mehreren Bedingungen
Katja

Hallo Leute,
brauche bei einer Funktion Eure Hilfe.
Spalte F steht die Dienstart, z.B. VD, B, RB usw.
Spalte W steht die Stundenanzahl ohne Pausenabzug
Ich möchte jetzt folgendes berechnen:
WENN(UND(F2="VD";W2 kleiner als 6);W2;WENN(UND(F2="VD";W2 kleiner als 9);W2-0,5;W...
13.07.2009 13:55:40
Thread-ID: 1088213
2 Beiträge
Anzeige

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
2
4
7
6
6
3
2
2
7
1
2
5
4
3
4
3
2
1
3
2
1
4
7
5
9