hab ein Makro gebastelt das per Knopfdruck ein Raster (nur ein paar waagerechte und
senkrechte Linien)einfügt. Beim erzeugen benennt er jede Linie mit "Linie" + laufender Nummer.
Jetzt wollt ich das das Raster auch per Konopfdruck wieder gelöscht wird. Habe da grad ne for-Schleife gebastelt:
Sub raster_aus()
Dim tb As Object
For Each tb In Sheets("Tabelle1").Shapes
If Left(tb.name, 5) = "Linie" Then tb.Delete
Next tb
End
Sub
Manchal funktionierts, meistens aber hängt sich Excel total auf und schließt sich.
Oder es kommt erst ne Fehlermeldung: "Automatisierungsfehler. Objetkt wurde vom Client getrennt."
Und dann schließt Excel sich. Aber was ist denn da dran falsch?
Oder gibt es vielleicht einen anderen weg das Raster wieder zu löschen?
Lisa