vba word 怎样选中 某字符串所在的表格

比如，一个word文档里面有多个表格，其中某个表格里面有字符串123。

我不知道字符串123所在的表格是第几个，但是想要选中这个表格，怎么实现？

请各位大佬指导一下，谢谢了。

Sub aa()
    n = ActiveDocument.Tables.Count
    f = "soar"  '这里是你要找的文字
    ff = f & vbCr & Chr(7)
    st = 0
    For i = 1 To n
        m = ActiveDocument.Tables.Item(i).Rows.Count
        l = ActiveDocument.Tables.Item(i).Columns.Count
        For j = 1 To m
            For k = 1 To l
                If ActiveDocument.Tables.Item(i).Rows(j).Cells(k).Range.Text = ff Then
                    ActiveDocument.Tables(i).Select
                    st = 1
                    Exit For
                End If
            Next
            If st = 1 Then
                Exit For
            End If
        Next
        If st = 1 Then
            Exit For
        End If
    Next
End Sub

Ctrl+F试试？

如果我的回答对你有帮助，请点击旁边的采纳按钮，谢谢

这其实是个基础；
可使用Select方法选定文档中的对象

（私信我效果更佳）

先在word文档中遍历表格，再在表格中遍历各单元格文本，即可找到字符所在表格的单元格行列号。同时highlight这个表格即可。