Object Objekt
04.03.2003 11:23:41
Wolfgang
mit folgendem Test-Makro erhalte ich ein gewünschtes Ergebnis. Löschen ist aber so nicht möglich. Name ist z.Zt. 'Object 83'.
Was muß ich ändern um ein 'Objekt' zu löschen?
Konkret steht in einem Tabellenblatt immer nur ein Objekt mit sich verändernden Nummerierungen! Wie spreche ich dieses an um es löschen zu können?
Sub test()
a = ActiveSheet.Shapes.Count
MsgBox a
For b = 1 To a
MsgBox ActiveSheet.Shapes(b).Name
ActiveSheet.Shapes(b).Name.Delete (Dieser Befehl funzt nicht)
Next b
End Sub
Danke im voraús.
Gruß
Wolfgang
Anzeige