ein hoffentlich einfach zu lösendes Problem:
For Each objFile In objDir.Files
Set WB = Workbooks.Open(strDir & objFile.Name)
WB.Worksheets("Sheet1").Columns("G:M,Y:Z,AD:AH,AY:BA,CZ").Delete
WB.Close True
Next
... bleibt an .Columns(...) hängen. Hab's schon mit Zahlen statt Buchstaben und mit "Range()" probiert ... ohne Erfolg.Wenn ich nur einen Spaltenbereich (z.B. G:M) wähle, klappt's wunderbar.
Könnt ihr mir bitte helfen?
Liebe Grüße
Lukas