EXCEL中怎么去除英文和数字，只保留文字

Question

如图

Answer 1

Excel中经常会有文字和数字混合在一起的情况出现，下面具体说明将文字和数字拆分开来，只保留文字的方法：

1、打开一个文字和数字混合的Excel表格。

2、选中要放数字的单元格，在菜单栏中选择“公式--插入函数”。

3、弹出插入函数对话框，找到right函数。

4、right函数有两个参数，一个是源单元格，另一个是返回参数的位数。

5、选择好单元格和返回位数，单击“确定”按钮。

6、和文字混合在一起的数字被拆分出来，下拉第一个单元格，剩余的也被拆分开。

注意事项：

Excel虽然提供了大量的用户界面特性，但它仍然保留了第一款电子制表软件VisiCalc的特性：行、列组成单元格，数据、与数据相关的公式或者对其他单元格的绝对引用保存在单元格中。

Answer 2

1.在EXCEL中比较麻烦,
2.可以复制到WORD里面,在WORD可以用 编辑>>替换>>替换 选项卡>>在查找内容中输入 ^# (^#是任意数字的意思,只用输入^#两个字符)>>全部替换.
3.如果想去掉字母就将上面的^# 改成 ^$ 就可以了.
4.过程同上. 最后把内容再复制到EXCEL中,
5.注意以上过程不能做其它修改,不然,复制回去到EXCEL中的格式可能会不对.
6.在EXCEL中也可以用VBA写代码执行即可。

Answer 3

需要编程
按ALT+F11，插入-模块，复制下列语句

FunctionSplitNumEng(str As String, sty As Byte)
Dim StrA As String
Dim StrB As String
Dim StrC As String
Dim i As Integer
Dim SigS As String
For i = 1 To Len(str)
SigS = Mid(str, i, 1)
If SigS Like "[a-zA-Z]" Then
StrA = StrA & SigS
ElseIf SigS Like "#" Then
StrB = StrB & SigS
Else
StrC = StrC & SigS
End If
Next i
Select Case sty
Case 1
SplitNumEng = StrA
Case 2
SplitNumEng = StrB
Case Else
SplitNumEng = StrC
End Select
EndFunction

D2输入
=SplitNumEng(C2,3)
下拉公式追问

模板怎么用咯？复制到哪里能麻烦指导一下吗

追答

按ALT+F11，点击上面  视图   右边的   插入   -模块，复制下列语句

Function SplitNumEng(str As String, sty As Byte)

    Dim StrA As String

    Dim StrB As String

    Dim StrC As String

    Dim i As Integer

    Dim SigS As String

    For i = 1 To Len(str)

        SigS = Mid(str, i, 1)

        If SigS Like "[a-zA-Z]" Then

            StrA = StrA & SigS

        ElseIf SigS Like "#" Then

            StrB = StrB & SigS

        Else

            StrC = StrC & SigS

        End If

    Next i

    Select Case sty

        Case 1

            SplitNumEng = StrA

        Case 2

            SplitNumEng = StrB

        Case Else

            SplitNumEng = StrC

    End Select

End Function

D2输入  
      =SplitNumEng(C2,3)  
下拉公式

本回答被提问者和网友采纳

Answer 4

如果能确定中文文字都是在前面的话，可以用一个很简单的公式，D2中输入：
=LEFT(C2,LENB(C2)-LEN(C2))
向下拖拉复制追问

使用了公式后有些可以只保留文字，有些还是有数字什么的在后面

追答

看不到你的贴图，但如果用公式后如果中文后还有数字或字母，那说明你这一行原来单元格中西文有全角英文或全角数字。解决办法，加一个函数ASC将全角西文转换成半角西文，即公式修改为：
=LEFT(ASC(C2),LENB(ASCE(C2))-LEN(ASC(C2)))