Spalten löschen - ganze Tabelle ist leer !!
09.12.2004 10:57:31
Jutta
was mach ich denn da falsch ?
Ich lösche bestimmte Spalten mit folgendem Makro
Sub Spalten_löschen()
Application.ScreenUpdating = False
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("F:F").Select
Selection.Delete Shift:=xlToLeft
Range("A4").Select
Application.ScreenUpdating = True
End Sub
Aber anschließend ist die ganze Tabelle leer. Das selbe Problem habe ich auch, wenn ich Spalten einfüge.
Ich habe das mit dem Makrorecorder aufgezeichnet. Beim neuen Starten ist jeweils die Tabelle leer.
Gruß
Jutta