Error when changing Table

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Andibevan - 16 Aug 2005 11:37 GMT

I get the following error when trying to alter the value of a table:-

"Cannot Access individual rows in this collection because the table has
vertically merged cells"

This is the code that causes the problem

With oAppWD.ActiveDocument.Tables(1).rows(1).cells(2) = "V4.0"

(oAppWD = CreateObject("Word.Application") )

How do I change the value of cells within a table where there are vertically
merged cells?

Ta

Andi

Reply to this Message

Helmut Weber - 16 Aug 2005 12:36 GMT

Hi,

one way would be, not to use rows and columns at all.

Have a look at this one:

With ActiveDocument.Tables(1).Range
MsgBox .Cells.Count
.Cells(12).Select ' for testing
.Cells(12).Range.Text = "V4.0"
End With

Greetings from Bavaria, Germany
Helmut Weber, MVP WordVBA
"red.sys" & chr(64) & "t-online.de"
Word 2002, Windows 2000

Reply to this Message

Andibevan - 16 Aug 2005 12:47 GMT

Thanks Helmut - that's great :-)

> Hi,
>
[quoted text clipped - 12 lines]
> "red.sys" & chr(64) & "t-online.de"
> Word 2002, Windows 2000

Reply to this Message