Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 00:15:51
Passwort im Herbersforum ändern
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
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
1792to1796
1792to1796
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Benutzerdefinierter Filter VBA

Forumthread: Benutzerdefinierter Filter VBA

Benutzerdefinierter Filter VBA
11.11.2020 09:29:42
Jim
Hallo Zusammen,
ich würde gerne per VBA einen "Benutzerdefinierten Filter" verwenden, der aus einer Liste Einträge filtert, die in den vergangenen 5 Stunden geändert wurden.
Leider werden nach Aufrufen des Makros alle Einträge ausgeblendet, erst wenn ich auf das Filtersymbol klicke, den "Benutzerdefinierten Filter" aufrufe und mit "OK" bestätige, werden die Einträge korrekt angezeigt. Beigefügt ist eine Beispieldatei, die das Problem verdeutlicht.
Vielen Dank schon mal im Voraus für Eure Tipps.
Jim
https://www.herber.de/bbs/user/141459.xlsm 
  • Public Sub Datumfilter()
Dim Datum As Date
Datum = Now
Rows("1:1").AutoFilter Field:=3, Criteria1:=">" & DateAdd("h", -5, Datum), Operator:=xlAnd,  _
Criteria2:="

    • Anzeige

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

    Betreff
    Datum
    Anwender
    Anzeige
    AW: Benutzerdefinierter Filter VBA
    11.11.2020 10:00:17
    Nepumuk
    Hallo Jim,
    teste mal:
    Public Sub Datumfilter()
        
        Dim Datum As Date
        
        Datum = Now
        
        Rows(1).AutoFilter Field:=3, Criteria1:=">" & Replace(CDbl(DateAdd("h", -5, Datum)), ",", "."), _
            Operator:=xlAnd, Criteria2:="<" & Replace(CDbl(Datum), ",", ".")
        
    End Sub

    Gruß
    Nepumuk
    Anzeige
    AW: Benutzerdefinierter Filter VBA
    11.11.2020 10:43:29
    Jim
    Hallo Nepomuk,
    vielen Dank für Deine Antwort. Der Code funktioniert wie gewünscht.
    Könntest Du mir bitte noch eine kurze Erklärung dazu schreiben? Mir ist leider nicht bewusst, an welcher Stelle ich Komma für Punkt eingesetzt habe?
    Vielen Dank und Gruß
    Jim
    AW: Benutzerdefinierter Filter VBA
    11.11.2020 10:51:02
    Nepumuk
    Hallo Jim,
    Ein Datum ist eine Ganzzahl, für Heute z.B. 44146 eine Uhrzeit sin Nachkommazahlen, für 11:00:00 Uhr ist das 0,458333333333333. Also für Heute 11:00:00 ist das 44146,458333333333333 und dieses Komma muss durch einen Punkt ersetzt werden.
    Gruß
    Nepumuk
    Anzeige
    AW: Benutzerdefinierter Filter VBA
    11.11.2020 10:53:25
    Daniel
    Hi
    der Autofilter braucht Zahlen oder Datumswerte im Amerikanischen Format.
    dh bei Zahlen muss der Punkt als Dezimalzeichen verwendet werden anstelle des Kommas
    Datumswerte müssten im Format Monat/Tag/Jahr oder Jahr-Monat-Tag geschrieben sein um als solche erkannt zu werden.
    Datumswerte können auch als Zahl geschrieben sein (jeder Tag +1 ab dem 1.1.1900, Nachkommastellen bilden die Uhrzeit
    Gruß Daniel
    Anzeige
    AW: Benutzerdefinierter Filter VBA
    11.11.2020 11:00:09
    Jim
    Hallo Nepomuk und Daniel,
    vielen Dank für die Erklärung.
    Gruß
    Jim
    ;

    Forumthreads zu verwandten Themen

    Liste "definierter Namen" per VBA?
    David

    Hallo zusammen,
    ist es per VBA möglich, die in einer Tabelle definierten Namen auszulesen, in einem neuen Sheet aufzulisten und daneben den/die mit dem Namen verbundene(n) Bereich bzw. Formel?
    Ich würde mir gern bei umfangreichen Namensdefinitionen das Nachschauen im Menü ersparen, da j...
    14.08.2008 12:15:44
    Thread-ID: 1001809
    5 Beiträge
    Anzeige
    LZF 1004 Anwendungs- oder objektdefinierter Fehler
    Himmelsbach

    Hallo zusammen,
    Ich habe ein kleines Problem beim Einfügen eines Kommentars in ein Zelle.
    Der Code lautet:
    Sub vergleichen () dim icolmax as integer dim irowmax as integer dim icol as integer dim irow as integer dim kommentar$ icolmax = 16 irowmax = thisworkbook.worksheets("IASEK...
    20.10.2008 20:20:00
    Thread-ID: 1017794
    6 Beiträge
    Wochenenden und definierter Datumsbereich
    Daniel

    Hallo zusammen,
    da meine letzte Fragestellung so super beantwortet wurde habe ich sogeich die nächste:
    Wie kann man folgendes realisieren? Es sollen die Wochenenden und die Schulferien(die ich in einem separatem Tabellenblatt definiert habe) farblich hinterlegt werden.
    Das Tabellen...
    11.02.2009 17:14:00
    Thread-ID: 1049704
    3 Beiträge
    Unnötiger Aufruf von Benutzerdefinierter Funktion
    Benutzerdefinierter

    Hallo!
    Ich versuche schon seit 2 Tagen folgendes Problem zu lösen:
    Ausgangslage:
    Ich habe mehrere Benutzerdefinierte Funktionen (UDF) geschrieben. Diese beinhalten SQL-Abfragen auf eine Accessdatenbank. Insgesamt rufe ich diese Funktionen einige hunderte mal in meiner Mappe auf. Das...
    11.03.2009 10:24:35
    Thread-ID: 1058997
    3 Beiträge
    Anwendungs- oder objektdefinierter Fehler
    Josef

    Hallo!
    Ich bekomme nach dem Start des Makros immer den Fehler Anwendungs- oder objektdefinierter Fehler.
    Das Makro hatte bereits funktioniert . Ich hatte nur den Pfad geändert:
    Im Ordner mit der Variable dokname3 befinden sich csv Dateien, welche dann eingelsen werden.
    Wo könnte...
    07.07.2009 10:00:05
    Thread-ID: 1086825
    6 Beiträge
    Anwendungs- oder objektdefinierter Fehler
    Josef

    Hallo!
    Ich bekomme nach dem Start des Makros immer den Fehler Anwendungs- oder objektdefinierter Fehler.
    Das Makro hatte bereits funktioniert . Ich hatte nur den Pfad geändert:
    Im Ordner mit der Variable dokname3 befinden sich csv Dateien, welche dann eingelsen werden.
    Wo könnte...
    07.07.2009 08:08:22
    Thread-ID: 1086829
    3 Beiträge
    Anzeige
    "Anwendungs- oder objektdefinierter Fehler"
    eres

    Hallo Excel-Freunde,
    habe mir in die Standard-Symbolleiste eine benutzerdefinierte Schaltfläche eingebaut und dieser ein Makro aus der personl.xls zugewiesen. Diese Makro besteht nur aus einer Zeile, in der ich eine Datei öffne (also Workbooks.Open Filename:= ...)
    In der zu öffnenden...
    28.07.2009 13:18:05
    Thread-ID: 1091892
    7 Beiträge
    Anzeige
    verkette Liste als benutzerdefinierter Datentyp | Herbers Excel-Forum
    suchehilfe
    Hallo zusammen,
    ich möchte mir eine verkettete Liste als benuterdefinierten Typ erstellen.
    Nutze dazu folgenden Code: Type Element Inhalt As Integer nachfolger As Element End Type Type Liste Start As Element End Type Public Sub test() Dim A As Liste Dim d,e As Element A.Start = d d.Inhalt =...
    06.02.2010 15:04:17
    Thread-ID: 1136407
    17 Beiträge
    Anzeige
    Benutzerdefinierter Typ nicht definiert
    Bernd

    Hallo zusammen,
    ich erhalte bei Folgendem Code immer die meldung Fehler beim Kompilieren, Benutzerdefinierter Typ nicht definiert!
    Option Explicit Private WithEvents Timer1 As APITimer Wisst ihr, was ich da tun muss, um den Fehler zu beheben?
    Schöne Grüße, Bernd
    09.02.2010 09:47:37
    Thread-ID: 1136895
    4 Beiträge
    Benutzerdefinierter Typ
    eric

    Hallo,
    ich möchte einen benutzerdefinierten Typ erstellen, so der Standart
    Dim WithEvents ctlTb00601 As MSForms.TextBox
    so soll der definierte Typ aussehen
    Dim WithEvents ctlTb00601 As MSForms.TextBox1
    geht das,wenn ja, dann wie ?
    Danke im voraus ERIC
    11.02.2010 20:34:53
    Thread-ID: 1137905
    2 Beiträge
    Fehler beim Kompilieren - Benutzerdefinierter Typ
    Himmelsbach

    Hallo zusammen,
    Leider habe ich keine Ahnung von VBA und soll nichts desto trotz eine aus meiner Sicht anspruchsvolle Logik programmieren.
    Da eine reine textuelle Beschreibung nicht sonderlich hilfreich wäre, habe ich die Excelmappe beigelegt.
    Jetzt aber zu meinem Problem:
    Im Ta...
    11.03.2010 19:06:04
    Thread-ID: 1145179
    3 Beiträge
    Argumente in benutzerdefinierter Funktion
    Jo

    Hallo VBA Freunde,
    ich habe eine Frage zu den Argumenten bei benutzerdefinierten Funktionen:
    1)
    Wenn ich ein k zu einem K bei den Argumenten verändere, tut sich ja automatisch das k
    zu einem K verwandeln, jedesmal dort wo in der Funktion k auftaucht. (Bestätigung am Ende der Zei...
    26.03.2010 01:06:27
    Thread-ID: 1148590
    2 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