Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1564to1568
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
Inhaltsverzeichnis

autofilter + kopieren

autofilter + kopieren
03.07.2017 21:11:39
Michael
hallo!
ich häng grad bei einem makro und komm nicht auf den fehler. ich bekommen bei folgendem makro _
einen laufzeitfehler 1004 in der zweiten zeile bei activesheet...:

Sub copy_paste_filter()
' copy_paste_filter Makro
Sheets("Pivot controllo").Select
ActiveSheet.Range("$A$4:$E$2666").AutoFilter Field:=5, Criteria1:=""
ActiveWindow.SmallScroll Down:=120
Range("A4:E2667").Select
Range("A2667").Activate
Selection.Copy
Sheets("Foglio controllo x dati import").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub

kann mir jemand bitte auf die sprünge helfen? danke!!!
mike

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: autofilter + kopieren
04.07.2017 05:59:51
Hajo_Zi
es fehlt wovon verschieden.
Ich hätte auch
ActiveSheet.Range("$A$4:$E4").AutoFilter Field:=5, Criteria1:=""
geschrieben.
Select, Activate usw. ist in VBA zu 99,8% nicht notwendig.
Der Cursor ist kein Hund der überall rumgeführt werden muss.
Hinweise zu select usw. Hajo-Excel.de
Hinweise zu select usw. Online-Excel.de
Hinweise zu select usw. Online-Excel.de

Ich gebe keinen Dank für eine Rückmeldung, da ich durch solche Beiträge nicht meine Beitragszahl erhöhen muss.
Rückmeldung ist ja in der Heutigen Zeit nicht üblich und die wenigen die eine Rückmeldung geben, mögen mir das verzeihen, das kein Danke für eine Rückmeldung kommt.
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige