Makro wird nicht ordentlich verarbeitet
12.12.2007 11:51:00
Josef
Mittels eines Makros werden gewisse Spalten in einem Arbeitsblatt gelöscht.
Sub Ändern()
Sheets("Korrekturen").Select
Columns("A:B").Select
Application.CutCopyMode = False
Selection.Delete Shift:=xlToLeft
Columns("C:C").Select
Selection.Delete Shift:=xlToLeft
Columns("D:D").Select
Selection.Delete Shift:=xlToLeft
Columns("E:E").Select
Selection.Delete Shift:=xlToLeft
Columns("V:V").Select
Selection.Delete Shift:=xlToLeft
Columns("AB:AB").Select
Selection.Delete Shift:=xlToLeft
Columns("AC:AC").Select
Selection.Delete Shift:=xlToLeft
Columns("AD:AD").Select
Selection.Delete Shift:=xlToLeft
Columns("AS:AT").Select
Selection.Delete Shift:=xlToLeft
Columns("AS:BD").Select
Selection.Delete Shift:=xlToLeft
Wenn ich das Makro einzeln starte, dann klappt alles bestens.
Wenn ich jedoch den Startbefehl mittel Call am Ende eines anderen Makros einfüge so wird der Rest vom Makro nicht erkannt und die Spalten (Spalte AS:BD) werden nicht gelöscht.
Wo kann hier bitte der Fehler liegen, bzw. wie kann man hier eine Verzögerung der Verarbeitung einbauen?
Danke
josef