+ -
当前位置:首页 → 问答吧 → VBA用find查找的时候如何返回查找到的值?

VBA用find查找的时候如何返回查找到的值?

时间:2011-05-30

来源:互联网

word中,用find查找,如何能返回查找到的字符串?因为我是用通配符的,所以希望得到查找到的字符串。查了帮助没查到,求助各位高手

作者: zealot30   发布时间: 2011-05-30

Sub Macro2()

    Selection.Find.ClearFormatting
    With Selection.Find
        .Text = "2*" '这里放进通配符
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .MatchWildcards = True
    End With
    Selection.Find.Execute
    MsgBox "查到字符串:" & Selection.Range
End Sub

作者: sqhsqhli   发布时间: 2011-05-30