Why doesnt applies table style?

Question

Give, pls a hint (again ;))
I plan to format table entirely (table style, all cells style, para body style, para header style and cell header style)
I stared with:
Set MyInd = CreateObject("InDesign.Application.CS3")
Set myDoc = MyInd.ActiveDocument
Set myPage = myDoc.Pages.Item(1)
MyInd.Paste '(get clipboard from word-table)
Set myStory = myDoc.Stories.Item(1)
Set myParagraph = myStory.Paragraphs.Item(1)
Set myTable = myParagraph.Tables.Item(1)
On Error Resume Next 'for debugging purpose
myTable.Rows.Item(1).RowType = idRowTypes.idHeaderRow
On Error GoTo 0
'myTable.AppliedTableStyle = "Table Style Body"
i work, but don't overrides
'myTable.AppliedCellStyle = "Table Style Body" '''the same
myTable.ApplyStyle "Table Style Body", True
i override, but "OBJECT DOESNT support!"
myTable.ApplyStyle "Cell Style Body", True 'the same
How to apply table style to whole table? (how to script correctly?)
Thanks

Answer 1

Yes.
I wrote like this:
kk = myTable.Columns.Count
With myTable
Call .Cells.ItemByRange(.Cells.Item(1), .Cells.Item(-1)).Item(-1).ClearCellStyleOverrides
Call .ClearTableStyleOverrides
Set mySel = .Cells.ItemByRange(.Cells.Item(1), .Cells.Item(-1)).Item(-1) 'for all table
Set mySelH = .Cells.ItemByRange(.Cells.Item(1), .Cells.Item(kk)).Item(-1) 'for only header
End With
myTable.AppliedTableStyle = "Table Style Body"
mySel.AppliedCellStyle = "Cell Style Body"
mySelH.AppliedCellStyle.AppliedParagraphStyle = "Table body"
mySelH.AppliedCellStyle = "Cell Style Head"
mySelH.AppliedCellStyle.AppliedParagraphStyle = "Table Head"
So we can apply parastyles only for object "cell", not for "table"?
So we must have specified range of cells for working with?
Thanks.