使用互操作在 table 的末尾添加一行

add a row at the end of a table with interop

我想在 PowerPoint with Interop 中以编程方式在 table 的末尾添加一行。

我使用:

myShape.Table.Rows.Add(index)

插入除最后一行以外的任何地方都很好。 正如 MSDN 所描述的,您在索引中给出的行之前添加一行。

你知道在末尾加一行的方法吗table (我想在最后一行之前加一行,把最后一行复制到这行,然后清除最后一行,但应该有更好的方法)

您根本不使用索引,或者使用 -1 ,这是可选参数 的默认值。以下任一项都可以正常工作:

Dim newRow As PowerPoint.Row = slide.Shapes(1).Table.Rows.Add()

或者:

Dim newRow As PowerPoint.Row = slide.Shapes(1).Table.Rows.Add(-1)