I would think that this line

wdApp.ActiveDocument.Tables(wdApp.ActiveDocument.T ables.Count).Rows

should be

wdApp.ActiveDocument.Tables.Count.Rows etc.



--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP

"JWS315" wrote in message
...
I get an error trying to set Row 1 of a 2 row table to keep from breaking
across columns - Not sure what is not correct witht code below? Error is
438
Object does not support this property or method...

Set myRange = wdApp.Selection.Range
Set myTable = wdApp.ActiveDocument.Tables.Add(myRange, 2, 1,
wdWord9TableBehavior, wdAutoFitWindow)
wdApp.ActiveDocument.Tables(wdApp.ActiveDocument.T ables.Count).Rows(1).AllowBreakAcrossPage
= False

Jerry