Vb.net 图像注入MSWord中的错误表单元格
我正在尝试在Microsoft Word中创建一个包含图像的表。所有图像都放置在单元格[1,1]中。我尝试了几种不同的方法。关于如何将我的第二张图像放入单元格[1,2]有什么想法吗Vb.net 图像注入MSWord中的错误表单元格,vb.net,ms-word,Vb.net,Ms Word,我正在尝试在Microsoft Word中创建一个包含图像的表。所有图像都放置在单元格[1,1]中。我尝试了几种不同的方法。关于如何将我的第二张图像放入单元格[1,2]有什么想法吗 oTable3 = oDoc.Tables.Add(oDoc.Bookmarks.Item("\endofdoc").Range, 1, 2) oTable3.Range.Borders.OutsideLineStyle = Word.WdLineStyle.wdLineStyleNone o
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)
谢谢你的帮助 没关系,我想出来了。 我在选择第二个单元格后添加了nothing操作行:
oTable3.Cell(2, 2).Range.Select()
oWord.Selection.TypeText("")