Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1144to1148
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
1144to1148
1144to1148
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Autofilter aus VBA liefert kein ergebnis

Autofilter aus VBA liefert kein ergebnis
Karsten

  • Hallo liebe Forumsgemeinde,
    ich habe ein Problem mit dem Autofilter, den ich mit folgendem Code "auslöse":
    ActiveSheet.Activate
    With ActiveSheet
    .AutoFilterMode = False
    .Range("A8:H8").AutoFilter
    .Range("A8:H8").AutoFilter Field:=1, Criteria1:=">=" & Range("J11").Value, Operator:=xlAnd, _
    Criteria2:=" End With
    Der Filter mit den Kriterien wird richtig gesetzt und liefert dann Daten, wenn ich Ihn mit Mouse und Tastatur öffne und erneut bestätige.
    Die zu filternden Daten sind Zahlen von 0,1 bis 0,99 in 0,01 Schritten.
    Kann jemand auf Anhieb erkennen was ich falsch mache, bzw. hat jemand eine Anregung?
    Habe schon gestern den ganzen Tag gesucht, finde dieses Problem aber nur im Zusammenhang mit "Datum", welches hier ja nicht vorliegt.
    Mit herzlichem Dank im Vorraus
    Karsten

    • 9
    Beiträge zum Forumthread
    Beiträge zu diesem Forumthread

    Betreff
    Benutzer
    Anzeige
    AW: Autofilter aus VBA liefert kein ergebnis
    20.03.2010 15:52:25
    Hajo_Zi
    Hallo Karsten,
    ich vor Range vielleicht einen Punkt gesetzt, da Du With hast.

    AW: Autofilter aus VBA liefert kein ergebnis
    20.03.2010 18:11:38
    Karsten
    Hallo Hajo,
    Vielen Dank für deine superschnelle Antwort. Leider verstehe ich nicht vor welchem range welcher Punkt fehlt?
    Wenn du das nochmal präzisieren könntest, wäre ich dir dankbar.
    AW: Autofilter aus VBA liefert kein ergebnis
    20.03.2010 18:16:11
    Hajo_Zi
    Hallo Karsten,
    es gibt in Deinem Code nicht viele Stellen wo vor dem Range kein Punkt ist.
    Gruß Hajo
    AW: Autofilter aus VBA liefert kein ergebnis
    20.03.2010 19:14:36
    Karsten
    Hallo Hajo,
    habe die beiden Punkte angefügt, sieht jetzt so aus:
    With ActiveSheet
    .AutoFilterMode = False
    .Range("A8:H8").AutoFilter
    .Range("A8:H8").AutoFilter Field:=1, Criteria1:=">=" & .Range("J11").Value, Operator:=xlAnd, _
    Criteria2:=" End With
    Leider hat sich das Ergebnis nicht geändert.
    Hast du noch eine andere Idee?
    Gruß
    Karsten
    Anzeige
    nicht Komma sondern Punkt
    20.03.2010 15:59:24
    Tino
    Hallo,
    Du musst das Komma durch einen Punkt ersetzen.
    Dim MinWert As String, MaxWert As String

With ActiveSheet
    If .AutoFilterMode Then
      .ShowAllData
    End If
    
    MinWert = Replace(Range("J11").Value, ",", ".")
    MaxWert = Replace(Range("N11").Value, ",", ".")

    .Range("A8:H8").AutoFilter Field:=1, Criteria1:=">=" & MinWert, Operator:=xlAnd, Criteria2:="<=" & MaxWert

End With
    Gruß Tino
    Anzeige
    AW: nicht Komma sondern Punkt
    20.03.2010 18:09:04
    Karsten
    hallo Tino,
    vielen Dank für deine Antwort.
    Leider funktioniert dein Code so nicht, wenn ich Ihn allein ausführe. Allerdings funktioniert die Sache, wenn ich meinen Code vorweglaufen lasse. Ist das so gemeint?
    Mit freundlichen Grüssen
    Karsten
    Zusatzanmerkung...
    20.03.2010 19:03:36
    Tino
    Hallo,
    aus .Range("A8:H43") kannst Du auch Range("A8:H8") machen.
    Wurde unter Version XP getestet.
    Gruß Tino
    AW: Zusatzanmerkung...
    20.03.2010 19:53:01
    Karsten
    Hallo Tino
    Vielen Dank für deine Mühe! Habe jetzt das Makro aus deinem Beispiel komplett kopiert -- und schon funktioniert es. Da muss mir vorher ein Fehler unterlaufen sein!!
    Kurios war für mich, das dein (von mir augenscheinlich falsch kopierter Code) zu keinem Ergebnis führte, aber das gewünschte Ergebnis kam, nachdem versehentlich erst mein ursprünglicher Code und dann der von dir übernommene Code direkt nacheinander ausgeführt wurde. Das nur zur Erklärung!
    Also abschließend:
    Dein Makro läuft super, du hast mir sehr geholfen. Vielen Dank dafür!!
    Karsten
    Anzeige

    303 Forumthreads zu ähnlichen Themen

    VBA- Autofilter - leere Zeilen löschen
    Asits

    Hallo,
    ich habe in der Spalte "A" Kundennummern stehen.
    Ich will per Makro / Autofilter die kompletten Zeilen
    derjehnigen Kunden löschen, die noch keine Kundennummer haben.
    wie mache ich das ?
    Vielen Dank vorab!
    17.09.2008 08:48:00
    Thread-ID: 1010225
    5 Beiträge
    Anzeige
    Autofilter mit VBA
    Steffan

    Hallo ihr Lieben,
    ich hab ein Problem mit einer Filter Routine. In einer Mitgliederliste soll Excel beim Aufruf der Datei überprüfen, ob Mitglieder ihr Austrittsdatum erreicht haben. In Spalte I stehen diese Daten im Format 31.12.2008.
    Aus dem Archiv hab ich mir folgenden Code herausges...
    12.01.2009 19:15:39
    Thread-ID: 1038988
    4 Beiträge
    Autofilter per VBA aufrufen
    Armin

    Hallo,
    ich habe folgendes Problem mit VBA.
    Ich habe in einer Liste den Autofilter eingebunden. Per VBA selektiere ich Daten nach Datumswerten mit folgendem Code:
    Zunächst lese ich das in Zelle A1 vorhandene Datum "01.01.2009" aus und lege dieses in der Variable "datVon" ab. Diese Va...
    21.01.2009 15:45:00
    Thread-ID: 1042249
    4 Beiträge
    Anzeige
    Problem mit Autofilter über VBA
    Antsche


    Wunderschönen guten Tag,
    ich habe ein Problem bei der Nutzung des Autofilters über VBA.
    In meinem Excel-File gibt es Tabellenblätter in denen Datensätze hinterlegt sind. Diese sollen über Eingaben in eine UserForm (ComboBoxen) gefiltert werden. Hier die Datei dazu:
    https://www...
    18.06.2009 16:53:36
    Thread-ID: 1082687
    4 Beiträge
    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
    Autofilter Doppelnennungen filtern über VBA
    Emil

    Hallo zusammen,
    ich habe folgendes Problem innerhalb eines größeren Makros:
    Ich habe eine Tabelle aus der ich mittels eines Makros Werte in ein Diagramm übertrage.
    Hierzu werden schon Spalten über den Autofilter nach bestimmten Auswahlkriterien gefiltert, das funktioniert alles wund...
    03.09.2009 17:33:39
    Thread-ID: 1100285
    2 Beiträge
    Blattschutz - Zugriff auf Autofilter -VBA-
    Wolfgang

    Hallo,
    mit nachstehendem Code wird in allen Tabellenblättern der Blattschutz eingeschaltet. Nun mußte ich feststellen, dass AutoFilter sich nicht bedienen lässt, so dass ich hierzu die nachstehende Ergänzung eingebaut habe. Allerdings ohne Erfolg, es tut sich nichts.- Wie müßte ich den Cod...
    26.10.2009 19:52:57
    Thread-ID: 1112334
    5 Beiträge
    Ohne VBA: Wenn Autofilter, dann anderen Zellwert
    sunni

    Hallo alle zusammen,
    gibt es eine Möglichkeit über Excel (ohne VBA) zu sehen, ob ein Autofilter gesetzt ist?
    Hintergrund: ich habe eine Formel bei gesetztem Autofilter. Wenn aber kein Autofilter gesetzt ist, soll hier in der Zelle eine 0 oder "" erscheinen.
    Geht das?
    Vielen Dank...
    08.01.2010 12:35:47
    Thread-ID: 1128216
    8 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
    4
    2
    3
    3
    4
    3
    2
    1
    4
    7
    1
    2
    8
    8
    3
    11
    4
    2
    4
    4
    5
    3
    2
    4
    2