如单元格的值即有字符又有数字，那怎么样取出它的数字部分
如果单元格的值即有字符又有数字，那怎么样取出它的数字部分
例：Ａ１的值是“KM1234566”,Ｂ１是“KM1234588G03”.那么str的值应是Ａ１中的“1234566”,str1应是Ｂ１中的“1234588”
[解决办法]
'说明:根据你的问题,看来只提取字符串出现的第一个数字值字符串,即忽略后面可能出现的数据值串,具体实现如下:
Function GetNumeric(strText As String) As Long
Dim i As Integer,strLen As Integer
strLen=Len(strText)
For i=1 To strLen
GetNumeric=Val(Mid(strText,i))
If GetNumeric> 0 Then '说明已解析到数值字符串
Exit For
End If
Next
End Function
