ich habe ein Problem mit nicht ganz leeren Zellen.
Ich habe mehrere Datenblatter in einem File, die in den ersten 10-300 Zeilen Inhalt stehen haben der formatiert ist. Nun sind leider auch nach der letzten Zeile (die kann ich identifizieren), auch noch Formate (aber keine Inhalte) vorhanden.
Wenn ich händisch in die Zeile (y+2) gehe und diese markiere, dann mit SHIFT-ENDE-DOWN nach unten springe und dann mit der rechten Maustaste 'ZELLEN LÖSCHEN' eingebe, dann ist der Bereich komplett leer.
Ich habe das mal versucht als Makro aufzuzeichnen, aber mit dem Code klappt es nicht. Der Code läuft durch, aber es wird anscheinend nicht gelöscht. Am Ende springt er dann noch in Zelle A1
Rows(y + 2).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Delete Shift:=xlUp
Range("A1").Select
Der Punkt ist, wenn ich den Bereich nicht lösche, ist meine Datei 12,6 MB groß - wenn ich händisch nur von den ersten 10 Blättern die Bereiche lösche, dann bin ich schon auf 11,8 MB (und es sind rund 70 Blätter)
Kann mir jemand einen Tip geben, wie ich den Bereich nach Zeile (y+2) komplett entsorgen kann?
Tommi