Leerzeilen löschen klappt nicht mehr

[Shervane]

EINMAL möchte ich es erleben, daß mal was nicht nicht mehr funktioniert; gestern war es das Übertragen von Fotos vom Handy auf PC, heute klappt das verdammte Makro in LO nicht mehr.
Und nein, es gab KEIN Update ...

Ich habe eine Einkaufsliste, die ich nach Erstellen auf ein 2. Blatt kopiere. Dann drückte ich einen Button, und alle Zeilen, wo in Spalte A nichts stand, wurden gelöscht.
Heute klappt das nicht mehr, natürlich, und kA, warum.
Das habe ich seit Jahren, sodaß ich nicht mehr weiß, wie wo ich Makro und Button erstellt habe.

Wie krieg ich das wieder ans Laufen?

Nachtrag
Das ist das Makro, glaube ich; warum die Bereiche da weg sind = kA, Bereich ging von A1 bis C-Ende.

Sub zeilen_loeschen

odoc=Thiscomponent
otab=odoc.CurrentController.ActiveSheet
spalte=0
obereiche= otab.Columns(spalte).queryEmptyCells
for i=obereiche.count-1 to 0 step -1
bereichszeilen=obereiche(i).Rows
bereichszeilen.removeByIndex(0,bereichszeilen.count)
next

End Sub

[Pit Zyclade]

Und warum schreibst du dann nicht "Makro "Löschen-Leerzeile" klappt nicht mehr?"
Dann weiß jeder, der mit Makros helfen will, was gefragt wird.....

[mikele]

Hallo,
da ich das Makro ja mal verbrochen habe, würde mich interessieren, was nicht funktioniert.
Passiert einfach nichts? Gibt es eine Fehlermeldung? Hängt es mit der Makrosicherheit zusammen? ...