ワードテーブルの行と列の値を比較し、セルを削除またはマージする

Question

問題は、複写された日付の値に基づいて複数の行がマージされるワードテーブルをフォーマットすることです。以下のサンプルでは、​​2列の日付値を複製し、カラム1つのディスプレイは、その日付に関連する対応するテキストは次のとおり部会 01/03に2017年1月3日の電子メールからメールを熟読

2017年1月3日/ 2017博士BからD氏 2017年1月3日電話からミスターD 2017年1月3日の電話コールに 2017年1月3日電話からメールを熟読私はで終わるしたい何

01/03/2017迷惑メールからのメッセージ 小委員会へのメール私は列1の1日とは私がcouldn列2のテキストをマージしたいです博士B

からミスターD 電話からミスターD 電話へ 電話から電子メールを熟読、それはMS Excelの方がターゲットに絞られていたので、MS Wordでのコーディングで多くの助けを得ました。

私が使用することができます知っている：

If ActiveDocument.Tables.Count >= 1 Then 
    With ActiveDocument.Tables(1) 
    .Cell(Row:=1, Column:=1).Merge _ 
    MergeTo:=.Cell(Row:=1, Column:=2) 
    .Borders.Enable = False 
    End With 
End If 

しかし、それは単純なマージであり、私は私が上記した条件に基づいて、より複雑な何かが必要。

誰かを援助して、正しい方向に向けることができます。

Answer 1

MS Wordでは、行をマージすると、そのテーブルの行を確実に処理できなくなります。一度列を結合すると、Wordは、そのテーブル内の個々のセルをアドレス指定する列番号に正しく応答することができません。したがって、あなたの計画は、少なくともVBAを使用している間は動作しません。

データを現場で修正しようとすると、タスクが非常に複雑になります。より簡単で簡単な方法は、すべてのものを新しいテーブルに書き直すことです。おそらく2つの列を持つテーブル（日付とその他すべてのテキストの列）です。

出力テーブルを設計する必要がありますが、ソーステーブルにセルが結合されていないこと、データが転送されるルールがないこと、およびあなた自身で問題を解決しようとしました。 :-)