如何在VB.Net的Word文档末尾设置光标?

时间:2019-02-14 09:29:06

标签: vb.net ms-word copy-paste

我正在通过VB.Net将表从Word文档复制/粘贴到另一个Word文档,但是它要么在两行之间保留,要么合并表格。

我正在使用VB.Net来自动执行Word文档,是从Word文档中复制一个格式化的表,然后将其粘贴到另一个Word文档中。

这里的问题是我必须在新粘贴的表和较早粘贴的表之间放置一个“分隔符”,否则单词将合并这两者(并将继续合并每个新粘贴的表)。

我试图将这段代码粘贴之前

oWord.Selection.MoveDown(Word.WdUnits.wdLine, 0)
oWord.Selection.InsertBreak(Word.WdBreakType.wdLineBreak)
oWord.Selection.PasteAndFormat(Word.WdRecoveryType.wdPasteDefault)

它工作正常,但它放了两行而不是一行。

如果有人给我一种保持粘贴(甚至添加新的paragragh)的方法,总是将其保留在文档的末尾(只有一个行宽分隔)

1 个答案:

答案 0 :(得分:0)

我有一个非常可以接受的解决方案

代替

oWord.Selection.MoveDown(Word.WdUnits.wdLine, 0)
oWord.Selection.InsertBreak(Word.WdBreakType.wdLineBreak)
oWord.Selection.PasteAndFormat(Word.WdRecoveryType.wdPasteDefault)

要插入一个中断,我使用了以下代码,并且运行良好

With oWord.Selection
    .Collapse(Direction:=Word.WdCollapseDirection.wdCollapseStart)
    .InsertParagraph()
    .Collapse(Direction:=Word.WdCollapseDirection.wdCollapseEnd)
End With

希望这对遇到相同问题的人有用