Excel正则提取数字

1、 像这种数字没有被文字或者其它符号隔断的，可以编写个简单的VBA，使用正则提取。我按了一下Alt+F11。打开VBE。

3、 双击“模块”，输入：Function zztq(rng As Range)Dim reg As O芟鲠阻缒bjectSet reg = CreateObject("VBScript.RegExp")With reg.Global = True.Pattern = "\d{1,}"zztq = .Execute(rng)(0)End WithEnd Function

5、 “就像这样，当成函数使用。” “但是我根本不懂那些代码什么意思吖。”办小妹说道。“不懂其实也不要紧，可以将该模块导出，下次使用的时候再导入使用就可以了，只是要记得‘zztq’就行了。” “そうですね！”办小妹的日语又奔出来了，欺负我听不懂。