Wie deaktiviert man eine Schaltfläche in Excel nach dem ersten Klick?
In einigen Fällen möchten Sie möglicherweise ein VBA-Skript durch Klicken auf eine Befehlsschaltfläche auslösen – und gleichzeitig sicherstellen, dass diese Schaltfläche nach dem ersten Klick in Excel deaktiviert wird. Wie lässt sich das umsetzen? Dieser Artikel stellt eine praktische Methode vor, mit der Sie genau das erreichen können.
Schaltfläche nach einmaligem Klicken in Excel deaktivieren
Schaltfläche nach einmaligem Klicken in Excel deaktivieren
Angenommen, Sie möchten die Daten aus dem Bereich A1:C17 automatisch in den neuen Bereich J1:L17 kopieren, indem Sie auf die Befehlsschaltfläche 1 im aktuellen Arbeitsblatt klicken – und diese Schaltfläche anschließend nach dem Kopieren und Einfügen deaktiviert wird. Gehen Sie dazu wie folgt vor:
1. Aktivieren Sie den Entwurfsmodus unter der Registerkarte „Entwickler“, indem Sie auf Entwickler > Entwurfsmodus klicken. Siehe Screenshot:
2. Klicken Sie mit der rechten Maustaste auf die Befehlsschaltfläche, der bereits ein VBA-Skript zugewiesen wurde, und wählen Sie im Kontextmenü Code anzeigen aus.
3. Fügen Sie im Fenster Microsoft Visual Basic for Applications den folgenden Code als vorletztes Element in den ursprünglichen Code ein – wie im folgenden Screenshot gezeigt.
VBA-Code: Befehlsschaltfläche nach einmaligem Klicken in Excel deaktivieren
CommandButton1.Enabled = FalseHinweis: „CommandButton1“ ist der Name der Befehlsschaltfläche.
4. Drücken Sie anschließend die Tastenkombination Alt+Q, um das Fenster Microsoft Visual Basic for Applications zu schließen.
5. Deaktivieren Sie den Entwurfsmodus unter der Registerkarte Entwickler.
Nachdem Sie die Befehlsschaltfläche einmal zum Ausführen des VBA-Codes angeklickt haben, wird sie – wie im folgenden Screenshot gezeigt – grau dargestellt und ist nicht mehr betätigbar.
Verwandte Artikel:
- Wie führt man über eine Befehlsschaltfläche in Excel das Speichern und Schließen der aktuellen Arbeitsmappe ohne Aufforderung aus?
- Wie kann eine Befehlsschaltfläche so positioniert werden, dass sie stets schwebend auf einem Excel-Arbeitsblatt bleibt?
- Wie kann man mithilfe einer Befehlsschaltfläche das aktuelle Datum und die Uhrzeit in Excel einfügen oder aktualisieren?
- Wie verwendet man eine Befehlsschaltfläche, um den Wert einer bestimmten Zelle in Excel zu ändern?
- Wie speichert man das aktive Arbeitsblatt mithilfe einer Befehlsschaltfläche als PDF-Datei in Excel?
- Wie fügt man mithilfe einer Befehlsschaltfläche automatisch eine neue leere Zeile in Excel ein?
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