怎么把一个excel表格里的数字和文字拆分开-excel分离数字文字,excel提取文字和数字

除了左右，还有一个中间函数mid
A1=1是的蝴蝶2
mid(a1,len(a1)-2))=是的蝴蝶

1.用MID函数copy：
B1=MID(A1,1,LENB(A1)-LEN(A1)+1)
C1=MID(A1,LENB(A1)-LEN(A1)+2,LEN(A1))
2.用RIGHT和LEFT函数：
B1=LEFT(A1,LENB(A1)-LEN(A1)+1)
C1=RIGHT(A1,2*LEN(A1)-LENB(A1)-1)
3.还可用自定义函数，这个比较复百杂。
打开VBA代码度窗知口道，新插入模块把下面的代码复制其中，关闭代码窗口
在B1中输入=hz(A1)
C1中输入=hm(A1)即可。

Function hz(X)
s= 0
a = Len(X)
For i = 1 To a
c = Mid(X, i, 1)
If Asc(c) < 48 Then
s = s+ 1
End If
Next i
hz = Mid(X, 1, S - 1)
End Function

Function hm(X)
s = 0
a = Len(X)
For i = 1 To a
c = Mid(X, i, 1)
If Asc(c) < 48 Then
s =s+ 1
End If
Next i
hm = Mid(X, S, a - S)
End Function