word 2010 vba，计数列

Question

我在Word中有一个导入的表格，其中包含连接的列。每行可能包含2列或更多列。 确定单行上列数的最佳方法是什么？ 我的目标是检查第二列的内容，当一行只包含两列时（没有行会有单列），并且忽略第二列的内容，那么在一行上有两列以上。

Answer 1

.Rows（CR）.cells.count产生每行的细胞数

With ActiveDocument.Tables(1).Range 
    For CR = 1 To .Rows.Count 
     For Each acell In .Rows(CR).Cells 
      debug.print .Rows(CR).cells.count 
     next 
    next 
end with