1. WHY are you merging cells? This is asking for trouble...because

2. VBA does not work with ranges in columns, AND it does not work with merged cells.

3. I hope you have just written in partial code, as you have undelcared varianles, and unSET objects. Just one...
[vba] topcell = myTable.Cell((i - 1), 3)
[/vba]fails as topcell is not SET as an object. It is declared as an object. Infact, eben if you do set the object:[vba]
Set myRange = ActiveDocument.Range(topcell _
.Range, myTable.Cell(i, 3).Range)
[/vba]should fail with a 4218 error.