Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Steuerelemente aus Tabellenblatt löschen

Gruppe

Tabellenblatt

Problem

Es sollen Steuerelemente aus Tabellenblättern gelöscht werden.

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn zwei Schaltflächen zu.

StandardModule: Modul1

Sub DeleteAll()
   Worksheets("Tabelle2").OLEObjects.Delete
   Worksheets("Tabelle2").Select
End Sub

Sub DeleteCBOs()
   Dim oOle As OLEObject
   For Each oOle In Worksheets("Tabelle3").OLEObjects
      If TypeName(oOle.Object) = "ComboBox" Then
         oOle.Delete
      End If
   Next oOle
   Worksheets("Tabelle3").Select
End Sub