如何用vba选中word表格中行、列、单元格？

在vba中处理excel单元格区域时，是不建议先选中单元格再操作的，这样会降低代码的运行速度。

但是用vba处理word文档时，先选择指定的内容，再执行相应的操作反而可以提高代码的运行速度。

处理word表格时，遇到合并单元格，用遍历的方式往往会弹出错误的提示，这时候用选中单元格、行、列的思路再进行逐单元格遍历是另一种有效的方式。

用vba选中word表格的行、列、单元格可以分别用Selection对象的SelectCell、SelectRow、SelectColumn方法。

以下代码演示了如何用vba选择word表格中的列对象。

Sub QQ1722187970()
    Dim oCell As Cell
    Dim oTable As Table
    Dim iCol
    For Each oTable In ActiveDocument.Tables
        With oTable
            iCol = .Columns.Count
            For i = 1 To iCol
                .Cell(1, i).Select
                '选择word的列
                Word.Selection.SelectColumn
                For Each oCell In Word.Selection.Cells
                    With oCell
                       '开始操作代码
                    End With
                Next
            Next i
        End With
    Next
End Sub