正则表达式查找一组数字

Question

我很难找到正则表达式，所以我想我会问大狗。

我有一个字符串，范围可以是1-4集，如下所示：

1234-abcd, baa74739, maps21342, 6789

现在我已经找到了1234-abcd，baa74739和maps21342的正则表达式。但是，我无法找出代码来提取单独的数字。有没有人对此有何看法？

我使用的正则表达式示例：

dbout.Range("D7").Formula = "=RegexExtract(DH7," & Chr(34) & "([M][A][P][S]\d+)" & Chr(34) & ")"
dbout.Range("D7").AutoFill Destination:=dbout.Range("D7:D2000")

Answer 1

用于数字独立替换

dbout.Range("D7").Formula = "=RegexExtract(DH7," & Chr(34) & "([M][A][P][S]\d+)" & Chr(34) & ")"
dbout.Range("D7").AutoFill Destination:=dbout.Range("D7:D2000")

与

dbout.Range("D7").Formula = "=RegexExtract(DH7," & Chr(34) & "(\b\d+\b)" & Chr(34) & ")"
dbout.Range("D7").AutoFill Destination:=dbout.Range("D7:D2000")

OR

dbout.Range("D7").Formula = "=RegexExtract(DH7,""(\b\d+\b)"")"
dbout.Range("D7").AutoFill Destination:=dbout.Range("D7:D2000")