如何让Word加载项创建一个可以稍后编辑的表

Question

我正在尝试制作一个Microsoft Word加载项，该加载项在当前选定的位置生成一个表，并且可以在以后引用和编辑该表。到目前为止，我一直在使用office.interop。我的实验代码是这样的：

Public Sub onTestButton1(ByVal control As Office.IRibbonControl)
    Dim oWord As Word.Application = Globals.ThisAddIn.Application
    Dim currentDocument As Word.Document = oWord.ActiveDocument
    Dim oTable As Word.Table
    Dim extentedDocument As Document = currentDocument.GetVstoObject()
    richTextControl1 = extentedDocument.Controls.AddRichTextContentControl("richTextControl1")
    richTextControl1.Title = "testTable"
    oTable = currentDocument.Tables.Add(richTextControl1.Range, 2, 2)
End Sub

这段代码的结果是一个内容控件包装的表，除了在内容控件内的表上方和下方插入换行符外，一切都很好。如果没有这些换行符，我怎么能做到这一点？

Answer 1

首先插入表，然后使用其Range插入Control。