Ich möchte einen neunen Block mit sechs neuen Zeilen in meine Liste einfügen. Das klappt soweit. Die Zellen möchte ich aber leeren. Das klappt nur bedingt. Ich nutze folgenden Code:
Range("B6:F11").Select
Selection.ClearContents
Range("H7").Select
Selection.ClearContents
Range("J6:J11").Select
ActiveWindow.ScrollColumn = 2
ActiveWindow.ScrollColumn = 3
ActiveWindow.ScrollColumn = 4
ActiveWindow.ScrollColumn = 5
ActiveWindow.ScrollColumn = 6
Selection.ClearContents
Range("K6:K11").Select
Selection.ClearContents
Range("L7:L11").Select
Selection.ClearContents
Range("M6").Select
Selection.ClearContents
Range("N6:P11").Select
Selection.ClearContents
Zum Teil haut es hin, aber zB die Zelle M6 klappt nicht. Hier wird der Wert aus der "alten Zellen" übernommen. Wenn ich das ganze manuell ausführe, funktioniert es aber. Es soll aber automatisch passieren. Wo steckt hier der Fehler?
Grüße
Sarah