Kako uporabiti preverjanje črkovanja v besedilnem polju?

Funkcijo črkovanja lahko enostavno uporabimo za preverjanje črkovanja besedilnega niza iz celice, vendar ta funkcija ni uporabljena v besedilnem polju za preverjanje črkovanja. V tem članku bom govoril o tem, kako uporabiti preverjanje črkovanja v besedilnem polju.

Uporabi preverjanje črkovanja v besedilnem polju s kodo VBA

Uporabi preverjanje črkovanja v besedilnem polju s kodo VBA

Če želite črkovati besedilni niz v besedilnem polju, vam lahko spodnja koda VBA naredi uslugo:

1. Najprej vstavite besedilno polje s klikom Razvojni > Vstavi > Besedilno polje (nadzor ActiveX)in povlecite, da narišete besedilno polje, glejte posnetek zaslona:

2. Nato prosim zapustite Način oblikovanja če želite v besedilno polje vnesti besedilni niz, kot ga potrebujete, po vnosu besedila nadaljujte z omogočanjem Način oblikovanjain z desno miškino tipko kliknite besedilno polje, da ga izberete Ogled kode v priročnem meniju si oglejte posnetek zaslona:

3. V odprti Microsoft Visual Basic za aplikacije okno, v modul zamenjajte prvotno kodo z naslednjo kodo VBA.

Koda VBA: Uporabi preverjanje črkovanja v besedilnem polju:

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. In nato pritisnite F5 za zagon te kode, Črkovanje pogovorno okno je omogočeno hkrati, nato lahko uporabite Črkovanje funkcija za črkovanje besedila v besedilno polje, kot je prikazano na sliki spodaj:

Sorodni članki:

Kako spremeniti barvo besedilnega polja glede na vrednost v Excelu?

Kako vstaviti sliko v polje z besedilom?

Kako nastaviti privzeto vrednost v besedilnem polju?

Kako dovoliti vnos samo številk v besedilno polje?