If Excel du er kjent med VBA-kode, kan du bruke denne metoden med følgende fremgangsmåte:
1. Klikk Developer > Visual Basic eller ved hjelp av snarveier (ALT + F11) i Excel for å aktivere Microsoft Visual Basic for Applications-vinduet, og klikk på Sett > Modulen.
To. Skriv inn følgende kode i modulen:
Sub RemoveNum () 'Updateby20131129Dim RNG Som RangeDim WorkRng Som RangeOn Error Resume NextxTitleId = "KutoolsforExcel" Set WorkRng = Application.SelectionSet WorkRng = Application.InputBox ("Range", xTitleId, WorkRng. Adresse, Type: = 8) For Hver RNG I WorkRng xOut = "" For i = 1 Til Len (Rng.Value) xTemp = Mid (Rng.Value, i, 1) Hvis xTemp Like "[. 0-9]" Deretter xStr = "" Else xStr = xTemp End If xOut = xOut & xStr Neste jeg Rng.Value = xOutNextEnd Sub4. Deretter klikker knappen for å bruke kode. Adialog er dukket opp på skjermen, kan du velge et område å fjerne alle numeriske tegn. se skjermbilde:
5. Klikk Ok alle de numeriske tegnene har blitt slettet