vba中怎么判断是否查找成功

wingcat

同上

zjwzri

设个flag就可以了

蜘蛛蝎

没明白你的意思
MsgBox("是否成功")

Dim regex, matches, match, found ' 声明变量
Set regex = New RegExp           ' 创建对象

regex.Pattern    = ""

Set matches = regex.Execute("your string")

For Each match in matches
    found = match.Value

    ' 后续操作
    '...
Next

wingcat

谢谢你啊