Wie erzwinge ich die Eingabe von Texten in Großbuchstaben in einem Textfeld?
In Excel können wir Kleinbuchstaben mithilfe der Großbuchstabenfunktion schnell in Großbuchstaben im Zelltext konvertieren. Haben Sie jemals versucht, den eingegebenen Text in einem Textfeld in Großbuchstaben zu zwingen? In diesem Artikel werde ich einen einfachen Code einführen, um diesen Job zu beenden.
Erzwingen Sie die Großbuchstabeneingabe in einem Textfeld mit VBA-Code
Erzwingen Sie die Großbuchstabeneingabe in einem Textfeld mit VBA-Code
Der folgende VBA-Code kann Ihnen einen Gefallen tun, wenn Sie die Eingabe des Textes als Großbuchstaben in ein Textfeld erzwingen:
1. Fügen Sie zunächst das Textfeld ein, indem Sie auf klicken Entwickler:in / Unternehmen > Insert > Textfeld (ActiveX-Steuerelement)und zeichnen Sie dann nach Bedarf ein Textfeld, siehe Screenshot:
2. Klicken Sie nach dem Einfügen des Textfelds mit der rechten Maustaste darauf und wählen Sie Code anzeigen aus dem Kontextmenü, um die zu öffnen Microsoft Visual Basic für Applikationen Fenster, und ersetzen Sie dann den Originalcode durch den folgenden VBA-Code in das leere Modul:
VBA-Code: Erzwingen, dass Text im Textfeld in Großbuchstaben geschrieben wird:
Private Sub TextBox1_Change()
TextBox1.Text = UCase(TextBox1.Text)
End Sub
3. Speichern und schließen Sie dann das Codefenster und beenden Sie das EntwurfsmodusWenn Sie jetzt Text in das Textfeld eingeben, muss dieser in Großbuchstaben eingegeben werden (siehe Abbildung):
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, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!