Question

我试图在Microsoft Word中创建一个包含图像的表格。所有图像都放在单元格[1,1]中。我尝试过几种不同的方式。关于如何将第二张图像放在单元格中的任何想法[1,2]？

    oTable3 = oDoc.Tables.Add(oDoc.Bookmarks.Item("\endofdoc").Range, 1, 2)
    oTable3.Range.Borders.OutsideLineStyle = Word.WdLineStyle.wdLineStyleNone
    oTable3.Range.Borders.InsideLineStyle = Word.WdLineStyle.wdLineStyleNone
    oTable3.Range.ParagraphFormat.SpaceAfter = 0
    oTable3.Range.ParagraphFormat.LineSpacingRule = Word.WdLineSpacing.wdLineSpaceSingle
    oTable3.Cell(1, 1).Range.Select()
    oWord.Selection.InlineShapes.AddPicture(FileName:=BPOCompSelector.FolderBrowserDialog1.SelectedPath & "\SUB1.jpg", LinkToFile:=False, SaveWithDocument:=True)
    oTable3.Cell(1, 2).Range.Select()
    'oTable3.Rows(1).Cells(2).Select()
    oWord.Selection.InlineShapes.AddPicture(FileName:=BPOCompSelector.FolderBrowserDialog1.SelectedPath & "\SUB2.jpg", LinkToFile:=False, SaveWithDocument:=True)

感谢您的帮助！

Answer 1

没关系，我明白了。我选择了第二个单元格之后添加了无操作行：

    oTable3.Cell(2, 2).Range.Select()
    oWord.Selection.TypeText("")

图像注入MSWord中的错误表格单元格

1 个答案: