Hur tar jag bort alla knappar eller kommandoknappar i Excel?

Den här artikeln förklarar hur du tar bort alla formulärkontrollknappar eller kommandoknappar från det aktiva bladet i Excel.

Ta bort alla knappar inklusive formulärkontrollknappar och kommandoknappar genom att välja dem alla
Ta bort alla knappar inklusive formulärkontrollknappar och kommandoknappar med VBA-kod
Ta bort alla formknappar eller kommandoknappar med VBA-kod

Ta bort alla knappar inklusive formulärkontrollknappar och kommandoknappar genom att välja dem alla

Gör så här för att ta bort alla knappar (inklusive formulärkontrollknappar och kommandoknappar) från det aktiva kalkylbladet.

1. Aktivera designläget genom att klicka på Utvecklare > Designläge. Se skärmdump:

2. Välj en av kommandoknapparna och tryck på ctrl + A för att välja alla knappar i det aktuella kalkylbladet.

3. tryck på Radera för att radera alla valda knappar.

Anmärkningar: Om det finns andra objekt i detta kalkylblad kommer de också att väljas.

Ta bort alla knappar inklusive formulärkontrollknappar och kommandoknappar med VBA-kod

Dessutom kan du använda nedanstående VBA-skript för att ta bort alla knappar från det aktuella kalkylbladet i Excel.

1. Öppna kalkylbladet innehåller de knappar du vill ta bort och tryck sedan på andra + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer fönstret klickar Insert > Modulernaoch kopiera sedan under VBA-koden till kodfönstret.

VBA-kod: Ta bort alla knappar från det aktiva arket

Sub Clear_ButtonsActiveSheet()
    Dim I As Long
    Dim xOLE As Object
    On Error Resume Next
    ActiveSheet.Buttons.Delete
    For Each xOLE In ActiveSheet.OLEObjects
        If TypeName(xOLE.Object) = "CommandButton" Then
            xOLE.Delete
        End If
    Next
End Sub

3. tryck på F5 nyckel för att köra koden. Alla knappar, inklusive formulärkontrollknappar och kommandoknappar, tas omedelbart bort från det aktuella kalkylbladet.

Ta bort alla formknappar eller kommandoknappar med VBA-kod

Om du bara vill ta bort alla formulärkontrollknappar eller alla kommandoknappar från det aktiva bladet, kan du prova nedanstående VBA-koder för att uppnå det.

1. Öppna kalkylbladet innehåller de knappar du vill ta bort och tryck sedan på andra + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer fönstret klickar Insert > Modulernaoch kopiera sedan under VBA-koden till kodfönstret.

VBA-kod: Ta bort alla formulärkontrollknappar från det aktiva arket

Sub Clear_ButtonsActiveSheet()
    ActiveSheet.Buttons.Delete
End Sub

VBA-kod: Ta bort alla kommandoknappar från det aktiva arket

Sub Clear_ButtonsActiveSheet()
    Dim xOLE As Object
    On Error Resume Next
    For Each xOLE In ActiveSheet.OLEObjects
        If TypeName(xOLE.Object) = "CommandButton" Then
            xOLE.Delete
        End If
    Next
End Sub

3. tryck på F5 för att köra koden.

Då tas alla formulärkontrollknappar eller alla kommandoknappar bort från det aktuella kalkylbladet omedelbart.

Relaterade artiklar:

• Hur infogar jag en tom ny rad automatiskt med kommandoknappen i Excel?
• Hur använder jag kommandoknappen för att spara aktivt kalkylblad som PDF-fil i Excel?
• Hur uppdaterar eller infogar (aktuellt) datum och tid med en kommandoknapp i Excel?
• Hur använder jag en kommandoknapp för att ändra ett angivet cellvärde i Excel?