🚀 go-pugleaf

I just did this in JS with the top row of a table selected:

myCells = app.selection[0];
myCells.cells.everyItem().texts[0].appliedParagraphStyle = "tableColHead";

and it worked. But I don't think VB has an equivalent to everyItem().

You can also use this to assign a paragraph style to any rectangular selection of cells in a table. Note though that if the selection is not rectangular (because of a merged cell sticking out of the selection rectangle) the selection cannot be processed by a script. Yuck!

This also works. Does VB have ItemByRange?

myCells = app.selection[0];
start = myCells.cells[0];
end = myCells.cells[-1];
myCells.cells.itemByRange(start, end).texts[0].appliedParagraphStyle = "table entry"

Dave