Live-Forum - Die aktuellen Beiträge
Datum
Titel
30.11.2023 16:11:59
zählenwenns anwenden auf z.B. A1:G5
30.11.2023 15:56:49
Formel Problem
30.11.2023 14:52:42
PDF Dateien selectieren und verschieben
Du konntest keine passende Antwort finden?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1712to1716
1712to1716
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

AutoFilter per VBA

AutoFilter per VBA
28.09.2019 06:08:53
Andreas
Hallo Leute,
was mache ich mit dem Code falsch? 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "H2" Then
ActiveSheet.Range("$B$4:$M$1500").AutoFilter Field:=3, Criteria1:=Target.Value
End If
End Sub
Ich möchte in "H2" ein Datum eingeben. Und dann soll der Autofilter den Rest machen. Leider gibt er mir kein Filterergebnis zurück.

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

Betreff
Datum
Anwender
Anzeige
AW: AutoFilter per VBA
28.09.2019 07:15:21
Hajo_Zi
diese Zeile
If Target.Address = "H2" Then
trifft niemals zu da Target.Address "$H$2" geprüft werden soll.

AW: AutoFilter per VBA
28.09.2019 09:02:07
Luschi
Hallo Andreas,
Hajo hat schon den Finger die offene Wunde gelegt, hier aber noch ein paar Ergänzungen:
- If Target.Address = "$H$2" Then
- If Target.Address(1, 1) = "$H$2" Then
- If Target.Address(True, True) = "$H$2" Then
- If Target.Address(0, 0) = "H2" Then
- If Target.Address(False, False) = "H2" Then
- If Not (Intersect(Target, [H2]) Is Nothing) Then
- If Not (Intersect(Target, Range("H2")) Is Nothing) Then
Da jedes Tabellenblatt nur einen Autofilter haben kann, stellt Vba dafür auch eine Methode _ bereit, ohne daß man wissen muß, wie der Addreßbereich lautet, deshalb sieht das bei mir aus: 

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(1, 1) = "$H$2" Then
ActiveSheet.AutoFilter.Range.AutoFilter Field:=3, Criteria1:=Target.Value
End If
End Sub
Gruß von Luschi
aus klein-Paris
Anzeige
AW: AutoFilter per VBA
28.09.2019 13:37:57
Andreas
ich glaube ich mache wieder was falsch. ich habe jetzt alle Varianten ausprobiert und das Ergebnis ist das gleich, keins.
Excel versucht ja was zu filtern, aber komischerweise nicht das was ich will.
AW: AutoFilter per VBA
28.09.2019 13:46:25
Hajo_Zi
Zu Deiner Datei kann ich nichts schreiben, was wohl daran liegt das ich nicht auf fremde Rechner schaue.
Gruß Hajo
Filter nach Datum...
29.09.2019 09:54:40
Boris
Hi,
...kann manchmal etwas tricky sein. Versuch mal, das Filterkriterium in einen Long-Wert umzuwandeln:
Criteria1:=CLng(Target.Value)
Falls nicht, zeig mal deine Datei.
VG, Boris
Anzeige

301 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
Autofilter via VBA wieder auf "ALLE" setzen
Patrick

Hallo Excel-VBA-Gemeinde,
ich habe ein kleines Problem mit Filtern.
Kann man den Filter wieder auf "Alle" setzen via VBA
Ich habe eine ComboBox (Alle, A, B) mit der ich filter
If .ComboBox1.Text = "A" Then
Selection.AutoFilter Field:=1, Criteria1:="A", Operator:=xlAnd
En...
24.10.2008 13:05:00
Thread-ID: 1018976
3 Beiträge
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
erste Zeile des Autofilters per VBA erkennen
Ptonka

Hallo zusammen,
ich stehe vor folgendem Problem:
Ich filtere per VBA per Autofilter eine umfangreiche Liste.
Je nach dem, welches Filterkriterium ich mitgebe, ist die erste angezeigte Zeile
eine andere Zeilennummer - logisch.
Nun möchte ich diese erste angezeigte Zeilennumme...
07.05.2009 13:31:01
Thread-ID: 1073590
5 Beiträge
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
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige