在word文档表格单元格的下一行放置第二个书签？

Question

我在光标位置的Word文档表单元格中放置了一个书签。现在我想在书签之后向下移动一行，在同一个表格单元格中放置另一个书签。我试图在书签后添加一个回车符，但光标停留在书签的第一行。

ActiveDocument.Bookmarks.Add Name:=bmItemNo, Range:=BMRange 
'Adds carriage return after bookmark 
BMRange.InsertAfter (Chr(13)) 

我也试过我的光标移动到该行的结束，下跌1线，但它跳出表格单元格：

ActiveDocument.Bookmarks.Add Name:=bmItemNo, Range:=BMRange 
'Adds carriage return after bookmark 
BMRange.InsertAfter (Chr(13)) 
Selection.EndKey unit:=wdLine, Extend:=wdMove 
Selection.MoveDown unit:=wdLine, Count:=1, Extend:=wdMove 

我的书签也可以字有多条线路的包裹。

书签后如何将光标移动到下一行？

Answer 1

你的代码几乎可以工作。你没有定义或告诉我们BMRange是什么，所以我做了一些假设。出于这个原因总是使用'​​Option Explicit'。你想明确定义所有变量。另外，插入文本和光标不相关。深入思考使用范围思考在文档中构建，而不是插入点。虽然我的代码示例不是最好的，但它确实说明了您的问题。

我不能得到你的结果，但这是我认为你想要的。是对的吗？

Option Explicit 
Public Sub Test() 
    Dim BMRange As Range 
    Set BMRange = Selection.Range 

    ActiveDocument.Bookmarks.Add Name:="One", Range:=BMRange 

    'Adds carriage return after bookmark 
    BMRange.InsertAfter (Chr(13)) 

    Selection.EndKey unit:=wdLine, Extend:=wdMove 
    Selection.MoveDown unit:=wdLine, Count:=1, Extend:=wdMove 

    Set BMRange = Selection.Range 
    ActiveDocument.Bookmarks.Add Name:="Two", Range:=BMRange 
End Sub