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

Makro: Autofilter funktioniert nicht

Forumthread: Makro: Autofilter funktioniert nicht

Makro: Autofilter funktioniert nicht
23.08.2018 15:34:02
Bensch111
Hallo zusammen,
ich habe ein Problem mit meinem Makro und wie ich im Forum sehen konnte, kennt Ihr euch bestens aus und hoffe daher auf ein wenig Hilfe :)
Habe ein Makro aufgenommen mit Auto-Filterfunktion:
Folgender Befehl wird aber nicht richtig umgesetzt:
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=28, Criteria1:=Array( _
"Header", "? Running", "? Delayed", "="), Operator:=xlFilterValues
Es zeigt leider nur die Leerzeilen und den Header an. Wenn ich die Leerzeilen und den Header rausnehme, zeigt er mir die anderen beiden Punkte aus dem Drop-Down Menü an...
Er überspringt quasi 2v4 Befehlen in geglicher Kombination.
Woran liegt das und wie lautet der richtige Code?
Besten Dank im Voraus.
Grüße,
Ben
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro: Autofilter funktioniert nicht
24.08.2018 17:07:15
Bensch111
Hallo,
anbei noch der ganze Code; ggf. hängt das ja zusammen.
Über Hilfe wäre ich sehr dankbar :)
Sub Show_next_30_days_medium()
' Show_next_30_days_medium Makro
'   ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=48
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=47
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=46
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=45
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=44
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=43
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=42
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=41
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=40
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=39
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=38
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=37
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=36
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=35
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=34
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=33
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=32
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=31
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=30
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=29
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=27
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=25
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=24
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=18
ActiveWindow.SmallScroll ToRight:=-4
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=12
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=8
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=6
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=4
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=2, Criteria1:=Array( _
"Advanced", "Header", "Medium"), Operator:=xlFilterValues
ActiveSheet.Range("$B$13:$AY$168").AutoFilter Field:=26, Criteria1:="
Beste Grüße,
Ben
Anzeige
;

Forumthreads zu verwandten Themen

Tabelle nach Anzahl sortieren
Pascal

Hallo,
wie kann ich eine Tablle nach der Anzahl der Wörter in einer Spalte sortieren?
Die Tabelle sieht etwa so aus:
Spalte1 | Spalte2 | Spalte 3
1 | der die | ...
2 | der | ...
3 | der die das | ...
und aussehen soll...
25.09.2008 11:50:39
Thread-ID: 1012284
6 Beiträge
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
Makro funktioniert nicht richtig, Werte auslesen
Uwe

Hallo zusammen, habe folgendes Problem in dem beigefügtem Makro funktioniert es nicht das er die Werte 2 und 3 aus der Tabelle ausliest. Wert 1 geht wunderbar. Hat jemand eine Lösung?
Hallo Uwe,
unregelmäßig aufgebaute Tabellen per Makro abzuarbeiten ist immer ziemlich aufwendig zu prog...
07.11.2008 08:22:00
Thread-ID: 1022502
2 Beiträge
Tabelle nach Namen durchsuchen -> Wert ausgeben
Aschi

Hallo,
ist es möglich mit einer Excel Funktion eine Tabelle nach gewissen Informationen zu durchlaufen und in einer anderen Zelle dann einen entsprechenden Wert auszugeben?
Also z.B. ich habe eine Liste und in der Zelle E steht „1. FC Köln“, eine Zeile darunter steht in E „FC Bayern Mün...
02.12.2008 16:17:12
Thread-ID: 1029551
8 Beiträge
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
Tabelle sortiert nicht im Netzwerk ?
A.Franz

Hallo...,
ich hoffe wirklich bei meinem nachfolgendem Problem kann mir jemand helfen,da ich mir das ganze nicht erklären kann.Ich habe eine ListBox mit 5-Spalten die über Row-Source A1:E gefüllt wird.Weiterhin habe ich eine Textbox über die ich einen Suchbegriff für die Auftragsnummer einge...
12.12.2008 11:25:00
Thread-ID: 1032340
2 Beiträge
Tabellen sortiere und nach wert in zelle
Walli

Guten Tag,
ich habe folgendes Makro für das Sortieren der Tabellenblätter
gefunden, funktioniert auch.:
Sub Tabellenblätter_sortieren() Dim Cnt As Integer Dim N As Integer Dim M As Integer On Error GoTo EndOfMacro Application.ScreenUpdating = False Cnt = ActiveWorkbook.Worksheets....
21.02.2009 11:24:43
Thread-ID: 1052581
7 Beiträge
Auto open funktioniert nicht richtig
Bodo

Guten Tag.
Ich versuche diesen Code hier zum Laufen zu bringen.
Sub Auto_open() ' Auto_öffnen Makro ' Blatt "Grundwerte" ausblenden. Unnötiges ausblenden. Blatt "Hinweise" aktivieren. In Vollbild- _ Modus schalten. Sheets("Grundwerte").Visible = False Sheets("Hinweise").Select ActiveW...
25.02.2009 14:31:35
Thread-ID: 1053941
6 Beiträge
Tabellen in Datei sortieren aber nach ...
walli

Guten Morgen,
ich habe eine große Datei mit vielen Tabellen.
Die Tabellen haben Namen z.B. Busch und Busch M also der gleiche Name
aber nach dem Namen Leerzeichen und ein großes M.
Ich möchte die Tabellen automatisch nach Namen sortieren + direkt
daneben jeweils die Tabe...
18.03.2009 09:17:28
Thread-ID: 1061282
3 Beiträge
Makrorekorder funktioniert nicht richtig
peter

Hallo Profis,
hätte mal eine Frage zum Makrorekorder. Wenn ich es aufzeichne und dann abspiele funktionierts nicht.
Ich will einen Autofilter setzten, der diverse Zellen ausblendet, und die noch sichtbaren will ich in ein anderes Tabellenblatt kopieren...aber warum will er nicht?
'M...
22.03.2009 20:46:13
Thread-ID: 1062704
5 Beiträge
Tabellenblattauswahl funktioniert nicht
Joni

Hallo,
ich habe das Phänomen, dass die Auswahl des Tabellenblatt nicht richtig funktioniert. Ich möchte eine Datei öffnen bei der beim Öffnen ein Makro ausgeführt wird, das die Daten aus einer anderen Datei in diese Datei hineinkopiert und die Datei wieder schließt. Öffnen ist kein Problem....
29.03.2009 23:03:58
Thread-ID: 1065138
11 Beiträge
Kopierte Werte nach Datum (aus)sortieren
Sirenia

Einen wunderschönen guten Morgen miteinander,
ich stehe vor folgendem Problem:
Ich kopiere Werte aus den Sheets M1-M4 mit diesem Code in die erste freie Reihe eines jeden Sheets (Werte aus Reihe 7 in M1 werden in die erste freie Reihe von M1 geschrieben, usw.).
Private Sub CommandBu...
13.07.2009 12:19:47
Thread-ID: 1088133
17 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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