Range angeben
10.12.2008 15:11:40
TomTom
ich möchte mehrere Spalten löschen, das hatte ich mir sogedacht :
Worksheets("Output").Range("A").Delete Shift:=xlToLeft
Worksheets("Output").Range("D:F").Delete Shift:=xlToLeft
Worksheets("Output").Range("I").Delete Shift:=xlToLeft
Worksheets("Output").Range("L").Delete Shift:=xlToLeft
NUn werden aber nicht die Splaten gelöscht, die ich haben will. Ich vermute mal, wenn ich Spalte A lösche , rutsche die Daten alle um eins nach links und dann lösche ich als nächstes nicht mehr D:F, sonder in Wirklichkeit E:G
Weiss nicht , ob das so stimmt, wie ich vermute.
Kann ich irgend wie mit einem Code bestimmte Zellen auf einmal löschen. Also mein Code irgendwie zusammengefasst ?
Danke Tom