怎样提取Excel单元格中的数字
发布网友
发布时间：2022-04-23 04:25
共1个回答
热心网友
时间：2022-06-07 22:34
如果数字在单元格中有规律的话，可以根据规律在设置公式读取。如果没有明显的规律，也可以通过vba编写自定义函数来实现。就第二种情况举例说明。
例如有数据表如图：
第一步：插入模块，并在模块中编写VBA代码。代码如下：
Function tqsz(a)
tqsz = ""
For I = 1 To Len(a)
If Asc(Mid(a, I, 1)) >= 48 And Asc(Mid(a, I, 1)) <= 57 Then
tqsz = tqsz & Mid(a, I, 1)
End If
Next I
End Function
第二步：在B2单元格输入公式：=tqsz(A2) 。结果如图：
第三步：将B2公式下拉至B4。结果如图：
