Sub CB_loeschen()
Dim obj As Object
For Each obj In ActiveSheet.OLEObjects
If obj.progID = "Forms.CommandButton.1" Then obj.Delete
Next
End Sub
Sub Patientenspeichern()
Range("a1").Select
Selection.Copy
Sheets("Tabelle2").Activate
Range("h31").End(xlUp).Offset(1, 0).Select
ActiveCell.PasteSpecial
Sheets("Tabelle1").Activate
Range("a1:e4000").Select
With Selection
.Copy
End With
Workbooks.Add
Range("a1").Select
ActiveSheet.Paste
Dim obj As Object
For Each obj In ActiveSheet.OLEObjects
If obj.progID = "Forms.CommandButton.1" Then obj.Delete
Next
End Sub
Um alle Excel-Buttons oder Schaltflächen von einem Tabellenblatt zu entfernen, kannst du den folgenden VBA-Code verwenden. Dieser Code löscht alle Commandbuttons (ActiveX-Controls) auf dem aktiven Blatt:
Sub CB_loeschen()
Dim obj As Object
For Each obj In ActiveSheet.OLEObjects
If obj.progID = "Forms.CommandButton.1" Then obj.Delete
Next
End SubWenn du stattdessen Formular-Schaltflächen (Form Controls) löschen möchtest, kannst du diesen Code verwenden:
Sub Schaltflaechen_loeschen()
Dim myShape As Shape
For Each myShape In ActiveSheet.Shapes
If myShape.FormControlType = xlButtonControl Then
myShape.Delete
End If
Next myShape
End SubNachdem du den gewünschten Code in das VBA-Editor-Fenster eingefügt hast, kannst du das Skript ausführen, um die Schaltflächen zu entfernen.
Problem: Die Commandbuttons werden nicht gelöscht.
Problem: Buttons werden beim Kopieren in ein neues Dokument mitkopiert.
Falls du keine VBA-Programmierung nutzen möchtest, kannst du die Buttons auch manuell entfernen:
Eine andere Möglichkeit ist, das gesamte Blatt in ein neues Dokument zu kopieren und dann die Schaltflächen zu entfernen.
Wenn du die Schaltflächen in einer bestimmten Excel-Version löschen möchtest, kannst du diesen Code anpassen. Zum Beispiel, wenn du die Schaltflächen in Excel 2016 löschen möchtest, funktioniert der oben genannte Code identisch.
Sub Beispiel()
' Dieser Code löscht alle Commandbuttons
Call CB_loeschen
End SubDu kannst auch einen Button erstellen, der beim Klicken alle Schaltflächen im aktuellen Blatt löscht.
1. Wie kann ich alle Excel-Buttons auf einmal löschen?
Mit dem richtigen VBA-Code kannst du alle Buttons in einem Schritt entfernen, wie in der Schritt-für-Schritt-Anleitung beschrieben.
2. Was ist der Unterschied zwischen Commandbuttons und Schaltflächen?
Commandbuttons sind ActiveX-Steuerelemente, während Schaltflächen aus der Symbolleiste Formular einfachere Grafikelemente sind.
3. Funktioniert das Löschen von Buttons in allen Excel-Versionen?
Ja, die beschriebenen Methoden sind in den meisten modernen Excel-Versionen anwendbar, einschließlich Excel 2010 bis 2021.
4. Kann ich eine Schaltfläche entfernen, ohne die gesamte Tabelle zu löschen?
Ja, du kannst einzelne Schaltflächen manuell mit der rechten Maustaste löschen oder den entsprechenden VBA-Code nutzen.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen