excel表格中如果有拼音和名字在一起，怎么能快速的把拼音去掉，光保留名字，是在一列的！谢谢

发布网友发布时间：2022-04-25 20:19

共2个回答

热心网友时间：2023-10-14 21:49

按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

比如你的数据在A1
BI输入 =SplitNumEng(A1,3) 表示提取中文

然后复制-选择性粘贴-数值B列数据，再删除A列

热心网友时间：2023-10-14 21:50

=IF(LEFT(RIGHT(A1,3),1)="",RIGHT(A1,2),RIGHT(A1,3))
ok

仅仅适用于英文和中文中间有空格，名字为2到3个字的。。。4个及以上的就不适用了。。。