Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Fehlermeldung bei "Un"-Filter-Makro

Forumthread: Fehlermeldung bei "Un"-Filter-Makro

Fehlermeldung bei "Un"-Filter-Makro
09.01.2008 12:17:57
wolfango
Hallo Experten,
ich habe zwei verschiedene Makros aufgezeichnet, die über gezeichnete Objekte gestartet werden können.
Das erste Makro setzt einen bestimmten Filter des Autofilters (funktioniert auch einwandfrei).
Das zweite Makro soll die Tabelle wieder ungefiltert erscheinen lassen.
Das funktioniert ebenfalls, aber: wenn die Tabelle bereits ungefiltert ist und man dann das zweite Makro erneut aufruft, erscheint Laufzeitfehler 1004 etc.
Kann ich diese Fehlermeldung irgendwie eleminieren?
Hinweis: wenn ich dann auf Debuggen klicke erscheint " ActiveSheet.ShowAllData" gelb markiert.
(sorry, habe keine/kaum VBA-Kenntnisse)
Danke vorab!!
Gruß,
Wo.

Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fehlermeldung bei "Un"-Filter-Makro
09.01.2008 12:20:00
Melanie
Hi,
verwende ActiveSheet.AutoFilterMode = False
um den Autofilter auzuheben.
Grüße, Melanie

AW: Fehlermeldung bei "Un"-Filter-Makro
09.01.2008 14:02:44
wolfango
....hmmm...das löst leider mein Problem nicht, da der Autofilter dann ja komplett deaktiviert ist (und aus anderen Gründen soll er aktiv bleiben)
Also, der Autofilter soll aktiviert bleiben aber ohne Filterkriterium, bzw. mit dem Filterkriterium "(Alle)"
(....vielleicht hatte ich mich hier auch unklar ausgedrückt, sorry)
Danke.
Wo.

Anzeige
AW: Fehlermeldung bei "Un"-Filter-Makro
09.01.2008 14:14:30
Renee
HiWo,
Das 2te Makro könnte so aussehen:

Sub FilterAn()
ActiveSheet.AutoFilterMode = False
ActiveSheet.Cells(1, 1).AutoFilter
End Sub


GreetZ Renée

AW: Fehlermeldung bei "Un"-Filter-Makro
09.01.2008 14:34:00
wolfango
....Danke..aber dadurch springt dann der (neue) Autofilter in die Zeile 1.
Der ursprüngliche Autofilter liegt aber über Zeile 5. Wie muss ich das Makro anpassen, damit der Autofilter auch wieder über Zeile 5 liegt?

Anzeige
ActiveSheet.Cells(5, 1).AutoFilter (owT).
09.01.2008 14:37:00
Renee

AW: ActiveSheet.Cells(5, 1).AutoFilter (owT).
09.01.2008 16:15:33
wolfango
....hmmm...der Autofilter erscheint auch dann wieder in Zeile 1.....was mache ich falsch?

AW: Fehlermeldung bei "Un"-Filter-Makro
09.01.2008 16:48:19
Renee
HiWo.
Ich kann den Aufbau deiner Tabelle von hier aus nicht sehen!
Dann gib den ganzen Bereich an, der gefiltert werden soll:

Sub FilterAn()
ActiveSheet.AutoFilterMode = False
ActiveSheet.Range("A5:C100").AutoFilter
End Sub


GreetZ Renée

Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige