Question

如何用excel中的VBA的正则表达式提取出字符串？

Answer 1

1、首先打开需要编辑的Excel表格，进入到编辑页面中。

2、然后点击打开主菜单栏开发工具中的“Visual Basic”选项。

3、还可以鼠标右键单击工作标签，选择打开“查看代码”。

4、然后在弹出来的窗口中点击输入：

Function REFIND(str, re)

    Dim Reg As New RegExp

    With Reg

    .Global = True

    .Pattern = re

    Set matchs = .Execute(str)

        For Each Match In matchs

            y = y & " " & Match

        Next

    End With

    'MsgBox y

    REFIND = y

End Function

5、然后运行就可以得到结果了。