Note: The other languages of the website are Google-translated. Back to English

Sut i gael gwared ar gymeriadau nad ydynt yn alffaniwmerig yn Excel?

Gan dybio bod yna ystod o ddata, fel JAMES0898 # 4% ^ {}, sy'n cynnwys nodau nad ydynt yn alffaniwmerig mewn taflen waith, ac yn awr dim ond tynnu'r cymeriadau nad ydynt yn alffaniwmerig a chadw'r nodau alffaniwmerig yr ydych am eu tynnu. Er enghraifft, JAMES0898 # 4% ^ {} > JAMES0898. Sut ydych chi'n dileu'r cymeriadau an-alffaniwmerig hynny yn Excel yn gyflym?


Tynnwch nodau nad ydynt yn alffaniwmerig gyda chod VBA

Gyda'r cod VBA byr canlynol, gallwch chi gael gwared ar y nodau nad ydynt yn alffaniwmerig hefyd. Gallwch ei wneud fel hyn:

1. Gwasgwch Alt + F11 allweddi gyda'i gilydd i agor y Microsoft Visual Basic ar gyfer cymwysiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, ac yna pastiwch islaw cod VBA i'r Modiwl:

VBA: Tynnwch yr holl nodau nad ydynt yn alffaniwmerig

Sub RemoveNotAlphasNotNum()
'Updateby2014128
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    xOut = ""
    For i = 1 To Len(Rng.Value)
        xTemp = Mid(Rng.Value, i, 1)
        If xTemp Like "[a-z.]" Or xTemp Like "[A-Z.]" Or xTemp Like "[0-9.]" Then
            xStr = xTemp
        Else
            xStr = ""
        End If
        xOut = xOut & xStr
    Next i
    Rng.Value = xOut
Next
End Sub

3. Gwasgwch F5 allwedd neu cliciwch y Run botwm i weithredu'r cod.

4. Yna dewiswch ystod rydych chi am gael gwared ar yr holl nodau nad ydynt yn alffaniwmerig yn y dialog naidlen, a chliciwch ar y OK botwm.

Nawr mae'r holl nodau nad ydynt yn alffaniwmerig wedi'u dileu o'r ystod a ddewiswyd. Gweler y screenshot:

2 glic i gael gwared ar yr holl gymeriadau nad ydynt yn alffaniwmerig trwy offeryn anhygoel

Rydyn ni'n rhoi cyrchwr yn aml mewn cell ac yna'n tynnu cymeriadau nad ydyn nhw'n alffaniwmerig fesul un â llaw. Os ydych chi'n gyfarwydd â VBA neu Swyddogaethau wedi'u Diffinio gan Ddefnyddwyr, gallwch ei godio a chael gwared ar yr holl nodau nad ydynt yn alffaniwmerig mewn swmp. Ond yma, byddaf yn argymell teclyn anhygoel, Nodwedd Dileu Cymeriadau o Kutools ar gyfer Excel, a all gael gwared ar bob math o gymeriadau gyda 2 glic yn unig! Nodwedd Llawn Am Ddim Treial 30-diwrnod!

Tynnwch nodau nad ydynt yn alffaniwmerig gyda Swyddogaeth Diffiniedig Defnyddiwr

Gallwch hefyd ddiffinio swyddogaeth arferiad i gael gwared ar yr holl nodau nad ydynt yn alffaniwmerig o gelloedd yn Excel.

1. Gwasgwch Alt + F11 allweddi gyda'i gilydd i agor y Microsoft Visual Basic ar gyfer cymwysiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, ac yna pastiwch y cod isod i'r Modiwl:

Swyddogaeth Diffiniedig Defnyddiwr: Tynnwch yr holl nodau nad ydynt yn alffaniwmerig

Function DeleteNonAlphaNumeric(xStr As String) As String
Dim xStrR As String
Dim xCh As String

Dim xStrMode As String
Dim xInt As Integer
    xStrMode = "[A-Z.a-z 0-9]"
    xStrR = ""
    For xInt = 1 To Len(xStr)
        xCh = Mid(xStr, xInt, 1)
        If xCh Like xStrMode Then
            xStrR = xStrR & xCh
        End If
    Next
    DeleteNonAlphaNumeric = xStrR
End Function
    

3. Nawr ewch yn ôl i'r daflen waith, dewiswch gell wag, a nodi'r fformiwla = DeleteNonAlphaNumeric (B3), ac yna llusgwch y lawrlwythiad handlen AutoFill i gymhwyso'r fformiwla hon i gelloedd eraill.


Tynnwch gymeriadau nad ydynt yn alffaniwmerig gyda Kutools ar gyfer Excel

Gyda dau ddull uchod, mae angen i chi wybod y codau, ond fel dechreuwyr Excel, ni all y mwyafrif ohonom ddefnyddio'r cod, felly yma byddaf yn rhoi ffordd hawdd i chi ei wneud.

Kutools ar gyfer Excel- Yn cynnwys mwy na 300 o offer defnyddiol ar gyfer Excel. Treial nodwedd lawn am ddim 30 diwrnod, nid oes angen cerdyn credyd! Get It Now

Os ydych wedi gosod Kutools ar gyfer Excel, gwnewch hynny fel y camau canlynol:

1. Dewiswch yr ystod sydd ei hangen arnoch i dynnu nodau nad ydynt yn alffaniwmerig, a chlicio Kutools > Testun > Dileu Cymeriadau.

2. Yna a Dileu Cymeriadau bydd blwch deialog yn ymddangos, dim ond gwirio Di-alffaniwmerig opsiwn, a chliciwch ar y Ok botwm.

Nawr mae'r holl nodau nad ydynt yn alffaniwmerig wedi'u dileu o'r tannau testun.


Erthyglau cysylltiedig:


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
sylwadau (3)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Diolch am rannu, ond dal ddim yn hoffi'r dull blwch mewnbwn... :D
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Gweithiodd dull VBA, ond dim ond yn gweithio ar yr ystod a ddewiswyd. Ni allwch nodi'r allbwn i ystod wahanol o gelloedd na'r mewnbwn. Felly mae'n rhaid i chi gopïo'r data ffynhonnell i'r ystod darged, dewis y data, rhedeg y sgript a chaniatáu iddo allbynnu i'r ystod ddiofyn. Hefyd, nid yw'r cyfnod (.) yn cael ei ystyried yn gymeriad arbennig, felly os ydych chi am gael gwared ar y rheini hefyd, bydd angen i chi chwilio a disodli.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Sut mae tynnu'r nodau tra'n cadw'r gwahanydd gofod?
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir