Word版ＶＢで表の任意の箇所を取得する（Cellメソッド）

Sub test01() On Error GoTo e1 MsgBox ActiveDocument.Tables(1).Rows.Count For i = 1 To ActiveDocument.Tables(1).Rows.Count For j = 1 To ActiveDocument.Tables(1).Columns.Count MsgBox ActiveDocument.Tables(1).Cell(i, j) Next j Next i Exit Sub e1: MsgBox i & "行" & j & "列エラー" Resume Next End Sub を作って実行してみました。それから推測すると ＞会社のＰＣだと結合されたセルは飛ばして列数を数えているようでしたが マージ（結合）されたとき、セルの要素に、ワードが何かサインを立てるのではないでしょうか。 列数という

[kiyo_hiko]

書類の自動作成に有用そう。