AW: CSP Dateien in Excel Importieren
01.03.2011 23:23:20
NewtonZ4
Hallo Sepp,
jetzt brauche ich nochmal Hilfe...
Nachdem die Blätter importiert sind möchte ich in allen Blättern Row 1-14 löschen und
in allen Blättern Columns A.
Leider wird jedesmal Columns B mit gelöscht.
Ich habe das ganze über den Makro Rekorder gemacht. Aber es Funzt nicht ;-(
Sub Zellen_Löschen()
' Zellen_Löschen Makro
Sheets(Array("M1 Flatter.csp", "M1.csp", "M2 Flatter.csp", "M2.csp", _
"M3 Flatter.csp", "M3.csp", "M4 Flatter.csp", "M4.csp")).Select
Sheets("M1 Flatter.csp").Activate
Columns("A:A").Select
Selection.Delete Shift:=x1ToLeft
Sheets(Array("BadActors.csp", "M1 Flatter.csp", "M1.csp", "M2 Flatter.csp", _
"M2.csp", "M3 Flatter.csp", "M3.csp", "M4 Flatter.csp", "M4.csp")).Select
Sheets("BadActors.csp").Activate
Rows("1:14").Select
Selection.Delete Shift:=xlUp
End Sub