第2个回答 2008-05-22
=lookup(9.9999999e+307,--mid(a1,min(if(isnumber(find({0,1,2,3,4,5,6,7,8,9},a1)),find({0,1,2,3,4,5,6,7,8,9},a1))),row(indirect("1:"&len(a1)))))
第3个回答 推荐于2016-10-16
按"Alt+F11"键,打开"Microsoft Visual Basic"窗口,点击"插入\模块"然后将下面的代码粘贴进去,
Public Function test(n As String) As Long
Dim b As String
Dim c As Long
b = ""
c = 0
For y = 1 To Len(n)
If Asc(Mid(n, y, 1)) >= 48 And Asc(Mid(n, y, 1)) <= 57 Then
b = b & Mid(n, y, 1)
End If
Next
test = b
End Function
关闭"Microsoft Visual Basic"窗口,回到Excel窗口中,在单元格中输入"=test(a1)",就可以将A1单元格中的数字提取到当前单元格了.
参考资料:忘了出处
本回答被提问者采纳