Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
900to904
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
900to904
900to904
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Autofilter in ein Macro

Autofilter in ein Macro
29.08.2007 11:55:24
Markus
Ich bekomme es leider nicht hin..
Hier habe ich mein bisheriges Macro. Ein Autofilter müsste nach der Zeile
ActiveWindow.Close SaveChanges:=False eingefügt werden.
Nur ein Autofilter, ohne irgendwelche Auswertungen oder Selektionen.
Hab schon alles mögliche probiert und bin leider mit meinem Latein am Ende.

Sub Makro1()
' Makro1 Makro
' Makro am 29.08.2007 von herkloma aufgezeichnet
Workbooks.Open Filename:="C:\Eigene Dateien\STÜLIAUSZUG\A1_KW3407.xls"
Rows("1:1").Select
Selection.ClearContents
ChDir "J:\Projekte"
Workbooks.Open Filename:="J:\Projekte\AU_KW_00.xls"
Rows("18:20").Select
Selection.Cut
Windows("A1_KW3407.xls").Activate
Selection.Insert Shift:=xlDown
Windows("AU_KW_00.xls").Activate
ActiveWindow.Close SaveChanges:=False
Cells.Select
Selection.Columns.AutoFit
Range("M16").Select
ChDir "C:\Eigene Dateien\STÜLIAUSZUG"
ActiveWorkbook.SaveAs Filename:= _
"C:\Eigene Dateien\STÜLIAUSZUG\A1_KW34_Auszug.xls", FileFormat:=xlExcel2, _
Password:="", CreateBackup:=False
ActiveWindow.Close
Application.WindowState = xlMinimized
End Sub


Vielen Dank für eure Hilfe.

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Autofilter in ein Macro
29.08.2007 12:57:59
AndrRo
Hallo markus,
Mit den Befehl aktiviert und deaktiert man den Autofiler:
Range("a1:c1").AutoFilter
Als Range den Bereich der Überschrift angeben.
gruss
Andreas
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige