In diesem Beispiel werden alle Elemente aus einem Listenfeld entfernt. Falls Shapes(2) kein Listenfeld darstellt, schlägt dieses Beispiel fehl.
Worksheets(1).Shapes(2).ControlFormat.RemoveAllItems