如何使用VBA识别Word文档中的现有表？

Question

有人可以帮助我识别word文档中的现有表吗，该表已经使用VBA导入到excel中了。

Answer 1

Word有一个Tables集合，可以逐步执行。在表格中，有一个单元格集合以标识单元格。因此，在Word中，您可以编写

Sub test()
Dim t As Table
     For Each t In ActiveDocument.Tables

          If Left(t.Cell(1, 1).Range.Text, 8) = "This One" Then
              MsgBox "Found It!"
              t.Select
          End If
     Next t
End Sub

在每个表的左上角搜索文本“ This One”。这有帮助吗？