excel 如何删除单元格内的汉字并且去掉指定的数字和字母

2024-11-27 23:37:24

推荐回答（4个）

回答（1）：

功能：将最后一个空格前面的字符全部去掉，然后保留后面部分的大小写字母和数字
用法：新建个模块，将代码复制进去。
然后在要显示结果的单元格输入 =AAA(A1) 括号内选择要处理的单元格

Public Function AAA(Rng As Range) As String
Dim i As Long, S As String
S = Rng.Value
S = Mid(S, InStrRev(S, " "))
For i = 1 To Len(S)
If Mid(S, i, 1) Like "[A-Za-z0-9]" Then AAA = AAA & Mid(S, i, 1)
Next
End Functi

回答（2）：

如果只要保留尾部的字母和数字，公式如下：
=RIGHT(A1,MATCH(TRUE,ISERR(AREAS(INDIRECT("A"&LEFT(RIGHT(A$1,ROW($1:$9)))&1))),)-1)
公式以CTRL+SHIFT+ENTER三键结束。

回答（3）：

如果你右边的代码就是AD0342都是6位的格式
假设你原来的数据在A列
那么你可以在另一列写上
=right(a1,6)
然后下拉，得到结果后复制这一列，然后在A列选择性粘贴，选择值

回答（4）：

Public Function tex(text As String)
tex = ""
For i = 1 To Len(text)
x = Mid(text, i, 1)
If LenB(StrConv(x, vbFromUnicode)) = 1 and x<>" " Then
tex = tex & x
End If
Next
End Function