作者:乔山办公网日期:
返回目录:excel表格制作
假若数据在A列,在B1中输入
=LEFT(A1,LENB(A1)-LEN(A1)) 这是文字在左、数字在右zhidao时提取文字的公式。若文字在数字的右边,把LEFT替换为RIGHT函数即专可。属
=RIGHT(A1,2*LEN(A1)-LENB(A1)) 这是文字在左、数字在右提取数字的公式。若数字在文字的左边,把RIGHT替换为LEFT函数即可。
没太明白问题,如果只是说同一个单元格内,需要分开汉字和数字,可以用空格,也可以ALT+回车让单元格内分行。
你的问题应该是后一种,点击单元格内的汉字或者数字,按ALT+回车就可以了
1.用MID函数:百
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
见截图
B1输入
=LOOKUP(9^9,--LEFT(A1,ROW($1:$10)))
C1输入
=SUBSTITUTE(A1,B1,"")
两公式下拉