Ich habe es gestern schoneinmal versucht, aber die gutgemeinten Tipps brachten nicht den Erfolg.
Ich hoffe auf einen Erfolg.
Sollte schon möglich sein (Makro), doch müsstest du ein bischen genauer formulieren, was du möchtest. In welcher Spalte stehen die Daten? Bestimmte Zeilen löschen (was für bestimmte)? "Die erste Zeile ab der Löschung ist eine Leerzelle".. heisst, dass, das ab der Leerzelle 12 Zeilen gelöscht werden sollen? Inkl. Leerzeile? Ganze Datei durchsuchen heisst mehere Blätter? usw.
Gruss
Chris
For Each Zelle In Range("A1:F29300")
If IsEmpty(Zelle) = True Then Rows(Zelle.Row & ":" & Zelle.Row + 11).Delete Shift:=xlUp
Next Zelle
Dim Zelle As Object
For Each Zelle In Range("A1:F29300")
If IsEmpty(Zelle) = True Then Rows(Zelle.Row & ":" & Zelle.Row + 11).Delete Shift:=xlUp
Next Zelle
Bevor ich mich weiter um Lösungen bemühe sei bitte erstmal präzise mit der Problembeschreibung. HTML ist jetzt auch wieder neu... das Makro funktioniert nicht in HTML sondern Excel. Dadurch kannst du auch sortieren wenn es sein muss, wobei mir der Sinn darin nicht verständlich ist. Die Grösse der Zelle spielt keine Rolle.
Das Makro funktioniert wie von dir gewünscht. Sobald im Bereich A1:F29300 eine leere Zelle gefunden wird, wird diese inkl. der folgenden Zeilen gelöscht.
Gruss
Chris