vba regexp
时间: 2023-10-10 10:07:32 浏览: 61
VBA中的正则表达式(Regular Expression)常用于检验和替换符合某个模式(规则)的字符串。在VBA中,我们可以使用VBScript的正则对象来实现正则表达式的功能。可以通过前期绑定或后期绑定的方式创建正则对象。对于前期绑定,需要在VBE中引用扩展库;对于后期绑定,可以使用CreateObject函数来创建正则对象。
以下是使用正则表达式进行四则运算的示例代码:
```
Dim r1 As RegExp
Dim m1 As Match
Dim mc1 As MatchCollection
Dim str As String
Dim sstr As String
'...
```
以下是一个正则表达式的语法示例代码:
```
Sub RegExpDemoSyntax()
Dim objRegEx As Object
Set objRegEx = CreateObject("vbscript.regexp")
objRegEx.Pattern = "Name:(.*?),Phone:(\d )"
objRegEx.Global = True
myString = "Name:张三丰,Phone:13801380000"
Set objMH = objRegEx.Execute(myString)
If objMH.Count > 0 Then
With objMH(j)
Debug.Print .submatches(0), .submatches(1)
End With
End If
Set objRegEx = Nothing
End Sub
```