方法:因为excel中没有现成的函数,如果我们需要使用,只能自定义函数来实现。
第一步:按下ALT+F11组合键,或者是单击工具——宏——Visual Basic编辑器,进入Visual Basic编程环境,单击“插入” 菜单——模块,复制下面代码,保存,退出关闭。
Public Function number(ByVal n As String) As String
For x = 1 To Len(n)
If Asc(Mid(n, x, 1)) >= 48 And Asc(Mid(n, x, 1)) <= 57 Or Asc(Mid(n, x, 1)) = 46 Then
number = number & Mid(n, x, 1)
End If
Next
End Function
第二步:返回excel操作界面,在B1单元格输入:=NUMBER(A1),就可以将A1单元格的数字提取到B1单元格,然后向下复制公式即可提取全部的数字。