VBScript.RegExp 正则表达式excel vba 学习经验

1) 手动引用(前期绑定)
   点击VBE编辑器菜单：工具 - 引用，选取:
Microsoft VBScript Regular Expressions 5.5
   Dim regex As
New InternetExplorer

2)
代码引用(后期绑定)
   Dim regex As Object
   Set regex =
CreateObject("VBScript.RegExp")


1) Global 属性
  
False，如果找到匹配的字符，就停止搜索（默认值）
   True ，搜索字符串中全部字符
    Sub
r_1()
        Dim regex As
Object
        Dim x As String
        x
= "a1b2c3"
        Set regex =
CreateObject("VBScript.RegExp")
        With
regex
            .Global
= True    
'返回"a#b#c#"
'            .Global
=
False    '返回"a#b2c3"
            .Pattern
= "\d"    '数字字符匹配