Group: microsoft.public.word.vba.general
From: =?Utf-8?B?R3JhZW1lUg==?=
Date: Wednesday, April 09, 2008 3:13 PM
Subject: Re: Iterate cells in a table

I want to split the new row into 2 columns.

Using your code as reference

.Rows.Add ' <== creates a new row with 3 columns
intCount = .Rows.Count
.Cell(intCount, 1).Split 1, 2 ' <== splits first cell - row has four
columns

My code

rw.Cells.Split 1, 1, True ' <== want to merge all cells in the row

From a single cell at the bottom of the table I can create the layout.

Restating the question (as the problem's evolved):
How do I add a new row to a table and merges its columns (considering error
5991)?

Thanks, Graeme

Safety Articles | Usenet Groups | Usenet News | Bluegrass