请问：如何用VBA取得字符串中从左起出现的第一个数值？
答案:1 悬赏:20
解决时间 2021-01-16 02:49
- 提问者网友：献世佛
- 2021-01-15 06:47
请问：如何用VBA取得字符串中从左起出现的第一个数值？
最佳答案
- 二级知识专家网友：山河有幸埋战骨
- 2021-01-15 08:01
假设数据在A1格，用下面代码可以搞定，数字会显示在B1格
Sub 提取()
a = Range("a1")
For i = 1 To Len(a)
If IsNumeric(Mid(a, i, 1)) Then
b = Mid(a, i, 1)
Range("b1") = b
Exit For
End If
Next
End Sub
Sub 提取()
a = Range("a1")
For i = 1 To Len(a)
If IsNumeric(Mid(a, i, 1)) Then
b = Mid(a, i, 1)
Range("b1") = b
Exit For
End If
Next
End Sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息！
大家都在看
推荐信息