如何用vba处理word表格？

在word中可以插入表格，这个表格与excel的表格很相似，但是在用vba处理word表格时，还是有所区别。

每一个word表格就是一个table对象，行列分别属于row、column对象，每一个单元格属于cell对象。

在给单元格赋值时，不能直接用cell.value而是要用cell.range.text进行赋值，这个是与excel单元格赋值的区别之处。

如果要遍历一个word表格中的所有单元格不能直接用table对象访问cells集合，而是要用table对象的range.cells属性返回所有单元格集合。

如以下代码是遍历word表格中的所有单元格的代码：

Sub QQ1722187970()
    Dim oT As Table
    Dim oCell As Cell
    Dim oDoc As Document
    Dim sText As String
    Set oDoc = Word.ActiveDocument
    For Each oT In oDoc.Tables
        With oT
            For Each oCell In .Range.Cells
                With oCell
                    sText = .Range.Text
                    '其它处理程序
                End With
            Next
        End With
    Next
End Sub