如何创建一个可以在以后编辑的表格?

时间:2013-11-19 22:23:24

标签: vb.net ms-word openxml office-interop

我正在尝试创建一个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

此代码的结果是内容控件包装表,除了在内容控件内的表的上方和下方插入换行符之外,一切都很顺利。如果没有这些换行符,我怎样才能做到这一点?

1 个答案:

答案 0 :(得分:1)

首先插入表格,然后使用其范围插入控件。