Come applicare il controllo ortografico in una casella di testo?
Possiamo facilmente applicare la funzione Controllo ortografico per verificare la stringa di testo da una cella, ma questa funzionalità non è applicabile alla casella di testo per il controllo ortografico. In questo articolo, parlerò di come applicare il controllo ortografico in una casella di testo.
Applica il controllo ortografico in una casella di testo con il codice VBA
Applica il controllo ortografico in una casella di testo con il codice VBA
Per controllare la stringa di testo in una casella di testo, il seguente codice VBA potrebbe esserti utile:
1. Per prima cosa, inserisci una casella di testo facendo clic su Sviluppatore > Inserisci > Casella di testo (Controllo ActiveX), e trascina per disegnare una casella di testo, vedi screenshot:
2. Successivamente, esci dalla Modalità progettazione per inserire la stringa di testo nella casella di testo secondo necessità; dopo aver digitato il testo, riattiva la Modalità progettazione e fai clic con il tasto destro sulla casella di testo per selezionare Visualizza codice dal menu contestuale, vedi screenshot:
3. Nella finestra aperta di Microsoft Visual Basic for Applications, sostituisci il codice originale con il seguente codice VBA nel Modulo.
Codice VBA: Applica il controllo ortografico nella casella di testo:
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. Quindi premi il tasto F5 per eseguire questo codice, la finestra di dialogo Controllo ortografico verrà abilitata immediatamente, dopodiché puoi utilizzare la funzione Controllo ortografico per correggere il testo all'interno della casella di testo, come mostrato nello screenshot seguente:
Articoli correlati:
Come cambiare il colore della casella di testo in base al valore in Excel?
Come inserire un'immagine in una casella di testo?
Come impostare un valore predefinito in una casella di testo?
Come consentire solo l'inserimento di numeri in una casella di testo?
I migliori strumenti per la produttività in Office
Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un'efficienza mai vista prima. Kutools per Excel offre oltre300 funzionalità avanzate per aumentare la produttività e farti risparmiare tempo. Clicca qui per ottenere la funzione di cui hai più bisogno...
Office Tab porta le schede su Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra invece che in nuove finestre.
- Aumenta la produttività del50% e riduce centinaia di clic del mouse ogni giorno!
Tutti gli add-in Kutools. Un solo programma di installazione
La suite Kutools for Office include add-in per Excel, Word, Outlook & PowerPoint più Office Tab Pro, ideale per i team che lavorano su più app di Office.
- Suite tutto-in-uno — Add-in per Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un solo programma di installazione, una sola licenza — configurazione in pochi minuti (pronto per MSI)
- Funzionano meglio insieme — produttività ottimizzata su tutte le app Office
- Prova completa30 giorni — nessuna registrazione, nessuna carta di credito
- Massimo risparmio — costa meno rispetto all’acquisto singolo degli add-in