Vba 是否将第二个书签放在word文档表格单元格的下一行?
我将书签放在游标位置的word文档表单元格中。现在,我想在同一个表格单元格中向下移动书签后的一行,然后放置另一个书签。我尝试在书签后添加回车符,但光标仍保留在书签的第一行Vba 是否将第二个书签放在word文档表格单元格的下一行?,vba,ms-word,bookmarks,Vba,Ms Word,Bookmarks,我将书签放在游标位置的word文档表单元格中。现在,我想在同一个表格单元格中向下移动书签后的一行,然后放置另一个书签。我尝试在书签后添加回车符,但光标仍保留在书签的第一行 ActiveDocument.Bookmarks.Add Name:=bmItemNo, Range:=BMRange 'Adds carriage return after bookmark BMRange.InsertAfter (Chr(13)) 我还尝试将光标移动到行尾并向下移动1行,但它跳出了表格单元格: Acti
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
我的书签也可以用多行文字换行
如何将光标移动到书签后的下一行?您的代码几乎可以正常工作。你没有定义或告诉我们BMRange是什么,所以我做了一些假设。因此,请始终使用“选项显式”。您希望显式定义所有变量。此外,插入文本和光标不相关。练习在文档中构建范围,而不是插入点。虽然我的代码示例不是最好的,但它确实说明了您的问题 我不能得到你的结果,但我认为这是你想要的。是这样吗
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