Excel 求助：用VBA从字符串中提取数字

Question

如题所述

Answer 1

Answer 2

给一个自定义函数：

Function tiqu(rg As String) '提取数字
    
    Set regx = CreateObject("VBScript.RegExp")
    With regx
        .Global = True
        .Pattern = "\D" '数字
    tiqu = .Replace(rg, "")
End With
End Function

本回答被网友采纳