excel中一个单元格中有文字字母字符和数字如何能把数字单独提取出来提取数字

2011-04-13 11:25匿名?|?分类：办公软件?|?浏览1375次

？

如A1中 A本月电费收入(美兰供电所)(对帐标志： 想在B中表示为

最好能教一个 方法 十分感谢

我有更好的答案 按默认排序|按时间排序

2条回答

检举|2011-04-13 11:32Mrpine|十五级

在EXECL理，按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,1) 表示提取字母 =SplitNumEng(A1,2) 表示提取数字 =SplitNumEng(A1,3)表示提取中文

追问

这个方法网上看过几次，但是个人水平也有限 还是不太会用 能否详细解释下 和 给出 操作过程

回答

打开你的EXECL，按ALT+F11，点上面菜单里的 插入-模块，复制下列语句后，关闭模块，返回到你的EXECL里，比如你的数据在A1

在BI输入 =SplitNumEng(A1,1) 回车 表示提取字母 =SplitNumEng(A1,2) 表示提取数字 =SplitNumEng(A1,3) 表示提取中文