Wie wende ich die Rechtschreibprüfung im Textfeld an?
Wir können die Rechtschreibfunktion leicht anwenden, um die Textzeichenfolge aus einer Zelle auf Rechtschreibprüfung zu überprüfen. Diese Funktion wird jedoch nicht auf das Textfeld zur Rechtschreibprüfung angewendet. In diesem Artikel werde ich darüber sprechen, wie die Rechtschreibprüfung in einem Textfeld angewendet wird.
Wenden Sie die Rechtschreibprüfung in einem Textfeld mit VBA-Code an
Wenden Sie die Rechtschreibprüfung in einem Textfeld mit VBA-Code an
Um die Textzeichenfolge in einem Textfeld zu überprüfen, kann der folgende VBA-Code Ihnen einen Gefallen tun:
1. Fügen Sie zunächst ein Textfeld ein, indem Sie auf klicken Entwickler:in / Unternehmen > Insert > Textfeld (ActiveX-Steuerelement)und ziehen Sie, um ein Textfeld zu zeichnen, siehe Screenshot:
2. Dann verlassen Sie bitte die Entwurfsmodus Um die Textzeichenfolge nach Bedarf in das Textfeld einzugeben, aktivieren Sie nach Eingabe des Textes die Option EntwurfsmodusKlicken Sie mit der rechten Maustaste auf das Textfeld, um es auszuwählen Code anzeigen Siehe im Kontextmenü Screenshot:
3. In der geöffneten Microsoft Visual Basic für Applikationen Im Fenster ersetzen Sie bitte den Originalcode durch den folgenden VBA-Code im Modul.
VBA-Code: Rechtschreibprüfung im Textfeld anwenden:
Sub SpellChkRvw_Click()
Dim xObject As Object
Dim xCell As Range
On Error Resume Next
Set xCell = ActiveSheet.Cells(ActiveSheet.Rows.Count, ActiveSheet.Columns.Count)
If ActiveSheet.OLEObjects.Count > 0 Then
For Each xObject In ActiveSheet.OLEObjects
xCell = xObject.Object.Text
xCell.CheckSpelling , , , 1033
xObject.Object.Text = xCell
Next
End If
End Sub
4. Und dann drücken F5 Schlüssel zum Ausführen dieses Codes, der Rechtschreibung Das Dialogfeld wird sofort aktiviert, dann können Sie das verwenden Rechtschreibung Funktion zur Rechtschreibprüfung des Textes in das Textfeld wie im folgenden Screenshot gezeigt:
In Verbindung stehende Artikel:
Wie ändere ich die Farbe des Textfelds basierend auf dem Wert in Excel?
Wie füge ich ein Bild in ein Textfeld ein?
Wie lege ich einen Standardwert in einem Textfeld fest?
Wie kann man zulassen, dass nur Zahlen in ein Textfeld eingegeben werden?
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!