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

Nach Datum filtern (VBA)

Forumthread: Nach Datum filtern (VBA)

Nach Datum filtern (VBA)
29.04.2015 11:13:53
Steven
Hallo Zusammen,
Ich habe eine Excel Datei in der Daten aus einer Access Datenbank importiert werden.
Wenn ich den Filter in der Datumsspalte händisch setze bekomme ich auch das richtige Ergebnis.
Zeichne ich dieses Marko aber auf und wende es an, liefert er 0 Ergebnisse.
Ich denke es hat etwas mit der formatierung der Spalte zu tun.
Hier der Code zum filtern

Sub Makro1()
' Makro1 Makro
ActiveSheet.ListObjects("Tabelle_Abfrage_von_MS_Access_Database").Range. _
AutoFilter Field:=5, Criteria1:=">=01.01.2014", Operator:=xlAnd, _
Criteria2:="
Wie bekomme ich das problem gelöst?
Besten Dank!

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Nach Datum filtern (VBA)
29.04.2015 11:17:37
Hugo
Hallo,
aus VBA heraus musst Du die englische Datumsschreibweise nutzen.
Gruß
Hugo

AW: Nach Datum filtern (VBA)
29.04.2015 11:28:46
Steven
Danke erstmal,
das englische Format wäre ja : MM:DD:YYYY.
Aber mit 

ActiveSheet.ListObjects("Tabelle_Abfrage_von_MS_Access_Database").Range. _
AutoFilter Field:=5, Criteria1:=">=01.01.2014", Operator:=xlAnd, _
Criteria2:="
funktioniert es leider auch nicht.

Anzeige
AW: Nach Datum filtern (VBA)
29.04.2015 12:02:31
Daniel
Hi
das Englische Datumsformat ist "MM/DD/YYYY", dh Monat, Tag, Jahr mit dem Schrägstrich getrennt.
nur so wird es in VBA vom Autofilter erkannt (in jeder Länderversion)
Gruß Daniel

AW: Nach Datum filtern (VBA)
29.04.2015 11:18:21
Tino
Hallo,
versuch mal das Datum als Zahl zu übergeben.
Nicht getestet!
 Criteria1:=">=" & clng(DateSerial(2014,1,1))
Gruß Tino

Anzeige
AW: Nach Datum filtern (VBA)
29.04.2015 11:24:46
Rudi
Hallo,
versuche
Criteria1:=">=" & CLng(CDate("01.01.2015")), Operator:=xlAnd, Criteria2:=" Gruß
Rudi

AW: Nach Datum filtern (VBA)
29.04.2015 12:39:10
Steven
Danke Rudi!
Hat super funktioniert!
;

Forumthreads zu verwandten Themen

VBA: Autofilter auf "0" setzen
David

Hallo zusammen.
Wenn in der Datei ein Autofilter gesetzt ist und auch in einem beliebigen Feld ein Kriterium gesetzt ist, wie bekomme ich per VBA die Anzeige ALLER Elemente hin.
Mein Versuch mit Range(XYZ).Autofilter
löscht diesen komplett, was aber nciht gewollt ist. Und .Autofi...
27.08.2009 09:53:08
Thread-ID: 1098941
3 Beiträge
Datum nach Quartalen filtern
Ben

Hallo zusammen,
hab jetzt über 2 Stunden im Forum gesucht, aber nichts hat funktioniert.
Folgendes Problem:
Ich habe eine Spalte mit mehreren Daten (TT/MM/JJJJ).
Nun möchte ich, mit Hilfe eines Command Buttons (VBA) nach einem Quartal filtern (z.B. Quartal I, 2009), so dass nur...
21.01.2010 20:01:06
Thread-ID: 1131934
8 Beiträge
Spalte nach Datum durchsuchen u danach Filtern
Marta

Hey Leute,
stehe vor meinem nächsten Problem. Nur leider fällt mir im Moment gar kein Lösungsweg ein, nicht einmal Ansatzweise.
Also das Szenario sieht folgendermaßen aus:
Ich habe eine Spalte mit verschiedenen Datumsangaben ab August 2009. Diese Spalte wird jeden Monat mit dem aktu...
03.08.2010 14:32:53
Thread-ID: 1170220
9 Beiträge
VBA Autofilter zurücksetzen wenn!
Thomas

Hallo zusammen!
Ich habe per VBA den Autofilter in meiner Tabelle gesetzt und es funktioniert auch wenn ich in A1 den Suchbegriff eintrage aber ich muss wenn ich alles sehen möchte den Filter von Hand zurücksetzten.
Wie kann man das auch per Code erreichen wenn A1 = "" oder aber "alle"...
16.05.2014 14:55:57
Thread-ID: 1361949
6 Beiträge
In VBA Autofilter mit spitzer Klammer setzen
Chris

Hallo allerseits,
in einer Tabelle habe ich eine Spalte mit Autofilter. Die Werte des Autofilters sind Höhenangaben wie z.B. "1 m", "2 m", aber es kommt auch der Wert "> 5 m" vor, sprich größer wie 5 Meter.
In VBA setze ich den Autofilter mit der Variable "wert"
ActiveSheet.Range...
05.12.2014 11:21:09
Thread-ID: 1396296
3 Beiträge
Autofiltern mit Makro nach Datum aus Zelle
Simon

Hallo,
aktuell gebe ich mich folgender Herausforderung und komme leider nicht weiter:
Ich habe zwei Tabellenblätter. Auf dem einen stehen die Daten und auf dem anderen möchte ich auswerten. Mit dem unten gezeigten Code bekomme ich die Tabelle bereits gefiltert. Jedoch würde ich gerne in...
23.03.2015 14:45:27
Thread-ID: 1416613
10 Beiträge
Anzeige
Filtern nach Datum in Userform
Andrea
Hallo liebes Forum,
ich habe mal eine Datei angehängt. Diese habe ich mir mal hier in diesem Forum gesucht. Nun habe ich diese ein wenig erweitert, und ich möchte nach Datum Filtern.
Also auf Übersicht dann Userform öffnen. Dann auf Beleg / Auswertungen und Rechnungsjournal gehen. Und da is...
29.12.2015 06:18:17
Thread-ID: 1466267
5 Beiträge
Anzeige
Datum sortieren nach Monat und Tag, nicht Jahr
Andreas

Hallo Excel-Experten,ich habe in den Zellen B1 bis B5 Geburtstage mit Jahreseingabe (also 03.02.80
09.06.75 usw.) von Personen eingetragen.Nun möchte ich diese Personen nach Geburtstag sortieren,
(Januar, Februar, März, usw.) ohne das Geburtsjahr zu berücksichtigen.Geht das mit Exce...
11.10.2002 19:53:17
Thread-ID: 168626
2 Beiträge
VBA Filter setzen
Emre

Hallo zusammen,
ich habe ein VBA Tool das eine Tabelle bereinigt und das Ergebnis ausgibt.
Ich möchte dass er im Ergebnis direkt einen Filter in der ersten Reihe hat, wenn die Spalte nicht leer ist.
Mit Rows(""1:1"). Autofilter ist in der ganzen Reihe ein Filter.
Vielen Dank...
24.05.2019 11:17:53
Thread-ID: 1694468
2 Beiträge
VBA Filter setzen
Emre

Hallo zusammen,
ich habe ein VBA Tool das eine Tabelle bereinigt und das Ergebnis ausgibt.
Ich möchte dass er im Ergebnis direkt einen Filter in der ersten Reihe hat, wenn die Spalte nicht leer ist.
Mit Rows(""1:1"). Autofilter ist in der ganzen Reihe ein Filter.
Vielen Dank...
24.05.2019 11:33:51
Thread-ID: 1694474
6 Beiträge
Anzeige
Per VBA den AutoFilter auf #NV setzen
Uli

Ich verwende die SVERWEIS Funktion, um Texte an Hand eines Wörterbuchs zu übersetzen. Wird ein Text nicht im Wörterbuch gefunden, bekomme ich in der Zelle #NV als Formelergebnis. Wie kann ich in VBA den AutoFilter so setzen, daß nur diese Zeilen angezeigt werden?
Beispiel: Selection.AutoFilt...
19.07.2003 06:11:03
Thread-ID: 282921
7 Beiträge
Anzeige
VBA Filtern nach Datum
Jürgen
Die Makroaufzeichnung der AutoFilterung in einer Datum- formartierten Spalte funktioniert nicht. Möglicherweise, weil in dem fertigen Makro das Kriterium als Text interpretiert wird.

Selection.AutoFilter Field:=14, Criteria1:=">20.11.2003", Operator:=xlAnd

Wie lautet die richtige Syn...
23.12.2003 20:45:11
Thread-ID: 355698
3 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Datum filtern in Excel mit VBA

Schritt-für-Schritt-Anleitung

Um in Excel nach Datum zu filtern, insbesondere wenn Du mit VBA arbeitest, folge dieser Schritt-für-Schritt-Anleitung:

  1. Öffne die Excel-Datei mit den importierten Daten aus der Access-Datenbank.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Erstelle ein neues Modul:

    • Klicke auf Einfügen > Modul.

  4. Füge den folgenden Code ein:

    Sub Makro1()
   ActiveSheet.ListObjects("Tabelle_Abfrage_von_MS_Access_Database").Range. _
   AutoFilter Field:=5, Criteria1:=">=" & CLng(CDate("01.01.2014")), Operator:=xlAnd
End Sub

  5. Ändere das Datum in das gewünschte Format. Achte darauf, dass Du die englische Datumsschreibweise (MM/DD/YYYY) verwendest, wenn Du mit VBA arbeitest.

  6. Führe das Makro aus und überprüfe, ob die Filterung wie gewünscht funktioniert.

Häufige Fehler und Lösungen

  • Fehler: 0 Ergebnisse beim Filtern
    Lösung: Stelle sicher, dass Du die englische Datumsschreibweise verwendest. Der Code sollte so aussehen: 

    Criteria1:=">=01/01/2014"

  • Fehler: Formatierungsprobleme
    Lösung: Überprüfe das Format der Datumsspalte. Das Datum muss im richtigen Format vorliegen, um korrekt gefiltert werden zu können. Du kannst auch versuchen, das Datum als Zahl zu übergeben, indem Du CLng(DateSerial(...)) verwendest.

Alternative Methoden

Falls Du keine VBA-Programmierung verwenden möchtest, kannst Du auch die normalen Excel-Filter verwenden:

  1. Markiere die Datumsspalte.
  2. Gehe zu Daten > Filter.
  3. Klicke auf den Dropdown-Pfeil und wähle Datumsfilter.
  4. Wähle die gewünschte Filteroption, z. B. Nach Datum filtern nach Monat und Jahr.

Praktische Beispiele

  • Beispiel 1: Filtere nach einem bestimmten Jahr (z. B. 2014):

    Criteria1:=">=01/01/2014"

  • Beispiel 2: Filtere nach einem bestimmten Monat (z. B. Januar 2014):

    Criteria1:=">=01/01/2014", Criteria2:="<=01/31/2014"

Tipps für Profis

  • Verwende Variablen für Datumswerte, um Deinen Code flexibler zu gestalten. Beispielsweise:

    Dim StartDatum As Date
StartDatum = DateSerial(2014, 1, 1)
ActiveSheet.ListObjects("Tabelle_Abfrage_von_MS_Access_Database").Range. _
AutoFilter Field:=5, Criteria1:=">=" & CLng(StartDatum)

  • Teste Deinen Code gründlich mit verschiedenen Datumsformaten, um sicherzustellen, dass er in allen Szenarien funktioniert.

FAQ: Häufige Fragen

1. Warum kann ich kein Datum im deutschen Format filtern?
In VBA musst Du die englische Datumsschreibweise verwenden, da sonst das Datum nicht erkannt wird.

2. Wie kann ich mehrere Kriterien für das Datum festlegen?
Du kannst mehrere Criteria in der AutoFilter-Methode angeben, um komplexe Filter zu erstellen. Verwende dazu Operator:=xlAnd oder Operator:=xlOr.

3. Funktioniert das auch in älteren Excel-Versionen?
Ja, die Verwendung von VBA zur Filterung nach Datum funktioniert in den meisten Excel-Versionen, solange die grundlegenden Funktionen unterstützt werden.

Beliebteste Forumthreads (12 Monate)

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