Wie kann man alle Kontrollkästchen in Excel gleichzeitig abwählen oder deaktivieren?
Wie können Sie alle aktivierten Kontrollkästchen in einem Arbeitsblatt – wie im folgenden Screenshot gezeigt – gleichzeitig abwählen oder deaktivieren? In diesem Artikel stelle ich Ihnen einige schnelle Codes vor, mit denen Sie dieses Problem effizient lösen können.
Alle aktivierten Kontrollkästchen mit VBA-Code abwählen oder deaktivieren
Alle aktivierten Kontrollkästchen mit VBA-Code abwählen oder deaktivieren
Alle aktivierten Kontrollkästchen (Formular-Steuerelemente) abwählen oder deaktivieren:
Wenn Ihre Kontrollkästchen Formular-Steuerelemente sind, können Sie sie mit dem folgenden VBA-Code gleichzeitig abwählen:
1. Halten Sie die Tasten ALT + F11 gedrückt, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie auf Einfügen > Modul, und fügen Sie den folgenden Code in das Modul-Fenster ein.
VBA-Code: Alle aktivierten Kontrollkästchen (Formular-Steuerelemente) abwählen oder deaktivieren:
Sub ClearCheckBoxes()
'Updateby Extendoffice
Dim chkBox As Excel.CheckBox
Application.ScreenUpdating = False
For Each chkBox In ActiveSheet.CheckBoxes
chkBox.Value = xlOff
Next chkBox
Application.ScreenUpdating = True
End Sub
3. Drücken Sie anschließend die F5-Taste, um diesen Code auszuführen. Daraufhin werden alle aktivierten Kontrollkästchen im aktiven Arbeitsblatt gleichzeitig abgewählt.
Alle aktivierten Kontrollkästchen (ActiveX-Steuerelemente) abwählen oder deaktivieren:
Wenn die Kontrollkästchen ActiveX-Steuerelemente sind, verwenden Sie bitte den folgenden VBA-Code:
1. Halten Sie die ALT + F11-Tasten gedrückt, um das Fenster Microsoft Visual Basic for Applicationszu öffnen.
2. Klicken Sie auf Einfügen>Modul, und fügen Sie den folgenden Code im Modul-Fenster ein.
VBA-Code: Alle aktivierten Kontrollkästchen (ActiveX-Steuerelemente) abwählen oder deaktivieren:
Sub clearcheckbox()
'Updateby Extendoffcie
Dim c As Object
For Each c In ActiveSheet.OLEObjects
If InStr(1, c.Name, "CheckBox") > 0 Then
c.Object.Value = False
End If
Next
End Sub
3. Drücken Sie anschließend die F5-Taste, um diesen Code auszuführen. Daraufhin werden alle aktivierten Kontrollkästchen im aktiven Arbeitsblatt gleichzeitig deaktiviert.
Mehrere Kontrollkästchen gleichzeitig in markierten Bereichen einfügen
Kutools für Excel's Batch-Einfüge-Kontrollkästchen-Funktion hilft Ihnen, mehrere Kontrollkästchen schnell auf einmal einzufügen.Klicken Sie hier, um Kutools für Excel herunterzuladen!
 |  |  |
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins