Laufzeitfehler 1004 bei Select
07.06.2017 09:38:19
Hartmut_M
In der Zeile Columns("A:C").select bekomme ich den Fehler 1004.
Habe das Makro vorher so mit Recorder aufgezeichnet.
Was kann die Ursache sein?
Danke für eure Hilfe.
Gruß Hartmut
Sub Sammeldatei()
'Filter setzen auf "n"
ActiveSheet.Range("$A$1:$M$1000").AutoFilter Field:=7, Criteria1:="n"
ActiveSheet.Range("A1:H" & ActiveSheet.UsedRange.Rows.Count). _
SpecialCells(xlCellTypeVisible).Copy
Worksheets("Sammeldatei").Visible = True
Worksheets("Sammeldatei").Select
Worksheets("Sammeldatei").Range("A1").PasteSpecial xlValues
Application.CutCopyMode = False
'Übertrag für Sammeldatei vorbereiten
Columns("A:C").Select