Wie löscht man den Inhalt eines Textfelds in Excel beim Anklicken?
Normalerweise müssen Sie, um den Inhalt eines Textfelds (ActiveX-Steuerelement) zu löschen, zunächst in das Feld klicken, den gesamten Text markieren und anschließend die Rücktaste oder Entf-Taste drücken. Wie können Sie den Inhalt eines Textfelds noch schneller löschen? Dieser Artikel stellt Ihnen eine VBA-Methode vor, mit der sich der Inhalt bereits beim Doppelklick automatisch löscht.
Inhalt eines Textfelds beim Klicken mit VBA-Code löschen
Inhalt eines Textfelds beim Klicken mit VBA-Code löschen
Der folgende VBA-Code ermöglicht es Ihnen, den Inhalt eines Textfelds mit einem Doppelklick blitzschnell zu leeren. Gehen Sie dazu wie folgt vor:
1. Falls sich bereits ein Textfeld im Arbeitsblatt befindet, aktivieren Sie den Entwurfsmodus, indem Sie auf Entwickler > Entwurfsmodus klicken. Siehe Screenshot:
Alternativ können Sie auch ein Textfeld einfügen, indem Sie auf Entwickler > Einfügen > Textfeld (ActiveX-Steuerelement) klicken. Siehe Screenshot:
2. Klicken Sie mit der rechten Maustaste auf das Textfeld und wählen Sie im Kontextmenü Code anzeigen. Siehe Screenshot:
3. Ersetzen Sie im geöffneten Fenster Microsoft Visual Basic for Applications den ursprünglichen VBA-Code im Codefenster durch den folgenden VBA-Code.
VBA-Code: Inhalt eines Textfelds beim Doppelklick löschen
Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
If Not iGblInhibitTextBoxEvents Then
TextBox1.Value = ""
End If
End SubHinweis: Im Code steht „TextBox1“ für den Namen des Textfelds, dessen Inhalt gelöscht werden soll. Passen Sie diesen bitte an Ihr Textfeld an.
4. Drücken Sie die Tastenkombination Alt + Q, um das Fenster Microsoft Visual Basic for Applications zu schließen.
5. Deaktivieren Sie den Entwurfsmodus.
Ab sofort wird der Inhalt eines Textfelds sofort gelöscht, sobald Sie es doppelklicken.
Entfesseln Sie die Magie von Excel mit KUTOOLS AI
- Intelligente Ausführung: Führen Sie Zelloperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles ganz einfach per Sprachbefehl.
- Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe optimal zu optimieren.
- VBA-Programmierung: Schreiben und implementieren Sie VBA-Code ganz mühelos.
- Formelinterpretation: Verstehen Sie komplexe Formeln spielend leicht.
- Textübersetzung: Überwinden Sie Sprachbarrieren direkt in Ihren Tabellenkalkulationen.
Verwandte Artikel:
- Wie kann man den Text eines Textfelds automatisch markieren, sobald es in Excel ausgewählt wird?
- Wie aktiviert man die automatische Vervollständigung eines Textfelds beim Tippen in Excel?
- Wie verknüpft man den Inhalt mehrerer Zellen zu einem einzigen Textfeld in Excel?
- Wie kann man die Bearbeitung in einem Textfeld deaktivieren, um Benutzereingaben in Excel zu verhindern?
- Wie formatiert man ein Textfeld in Excel als Prozentsatz?
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