Note: The other languages of the website are Google-translated. Back to English
Autentificare  \/ 
x
or
x
Înregistrare  \/ 
x

or

Cum se elimină toate butoanele sau butoanele de comandă din Excel?

Acest articol vorbește despre eliminarea tuturor butoanelor de control al formularului sau a butoanelor de comandă din foaia activă din Excel.

Eliminați toate butoanele, inclusiv butoanele de control al formularului și butoanele de comandă, selectându-le pe toate
Eliminați toate butoanele, inclusiv butoanele de control al formularului și butoanele de comandă, prin codul VBA
Eliminați toate butoanele de control formular sau butoanele de comandă cu cod VBA


Eliminați toate butoanele, inclusiv butoanele de control al formularului și butoanele de comandă, selectându-le pe toate


Procedați după cum urmează pentru a elimina toate butoanele (inclusiv butoanele de control al formularului și butoanele de comandă) din foaia de lucru activă.

1. Activați modul Design făcând clic pe Dezvoltator > Mod de proiectare. Vedeți captura de ecran:

2. Selectați unul dintre butoanele de comandă și apăsați tasta Ctrl + A tastele pentru a selecta toate butoanele din foaia de lucru curentă.

3. apasă pe Șterge pentru a șterge toate butoanele selectate.

notițe: Dacă există alte obiecte în această foaie de lucru, vor fi selectate și ele.


Eliminați toate butoanele, inclusiv butoanele de control al formularului și butoanele de comandă, prin codul VBA

În plus, puteți aplica mai jos scriptul VBA pentru a elimina toate butoanele din foaia de lucru curentă în Excel.

1. Deschideți foaia de lucru conține butoanele pe care doriți să le eliminați, apoi apăsați pe Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module, apoi copiați mai jos codul VBA în fereastra Cod.

Cod VBA: eliminați toate butoanele din foaia activă

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. apasă pe F5 tasta pentru a rula codul. Apoi, toate butoanele, inclusiv butoanele de control al formularului și butoanele de comandă, sunt eliminate imediat din foaia de lucru curentă.


Eliminați toate butoanele de control formular sau butoanele de comandă cu cod VBA

Dacă doriți doar să eliminați toate butoanele de control ale formularului sau toate butoanele de comandă din foaia activă. Puteți încerca codurile VBA de mai jos pentru ao realiza.

1. Deschideți foaia de lucru conține butoanele pe care doriți să le eliminați, apoi apăsați pe Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module, apoi copiați mai jos codul VBA în fereastra Cod.

Cod VBA: eliminați toate butoanele de control ale formularului din foaia activă

Sub Clear_ButtonsActiveSheet()
    ActiveSheet.Buttons.Delete
End Sub

Cod VBA: eliminați toate butoanele de comandă din foaia activă

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. apasă pe F5 tasta pentru a rula codul.

Apoi, toate butoanele de control ale formularului sau toate butoanele de comandă sunt eliminate imediat din foaia de lucru curentă.


Legate de articole:


Cele mai bune instrumente de productivitate Office

Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%

  • reutilizarea: Introduceți rapid formule complexe, diagrame și orice ai folosit anterior; Criptați celulele cu parola; Creați o listă de corespondență și trimiteți e-mailuri ...
  • Super Formula Bar (editați cu ușurință mai multe linii de text și formulă); Layout de citire (citiți și editați cu ușurință un număr mare de celule); Lipiți la interval filtrat...
  • Merge celule / rânduri / coloane fără a pierde date; Conținut de celule divizate; Combinați rânduri / coloane duplicate... Prevenirea celulelor duplicate; Comparați gamele...
  • Selectați Duplicat sau Unic Rânduri; Selectați Rânduri goale (toate celulele sunt goale); Super Find și Fuzzy Find în multe cărți de lucru; Selectare aleatorie ...
  • Copie exactă Mai multe celule fără modificarea referinței formulelor; Creați automat referințe la foi multiple; Introduceți gloanțe, Casete de selectare și multe altele ...
  • Extrageți textul, Adăugați text, eliminați după poziție, Eliminați spațiul; Creați și imprimați subtotaluri de paginare; Convertiți conținutul dintre celule și comentarii...
  • Super Filtru (salvați și aplicați scheme de filtrare altor foi); Sortare avansată după lună / săptămână / zi, frecvență și multe altele; Filtru special cu bold, italic ...
  • Combinați cărți de lucru și foi de lucru; Merge Tables pe baza coloanelor cheie; Împărțiți datele în mai multe foi; Conversia în loturi xls, xlsx și PDF...
  • Peste 300 de funcții puternice. Suportă Office / Excel 2007-2019 și 365. Suportă toate limbile. Implementare ușoară în întreprindere sau organizație. Funcții complete de încercare gratuită de 30 de zile. Garanție de restituire a banilor de 60 de zile.
fila kte 201905

Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse în fiecare zi!
fundul officetab
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    renzo88 · 1 years ago
    how about if it is in userform? what is the code