使用Selection对象从word文档中获取一行(vba)

Question

如何使用VBA脚本中的Selection对象从word文档中获取一行？像这样的东西:

Selection.MoveDown Unit:=wdLine, Count:=15
'print the 15th line here

编辑:当我这样做:

Selection.MoveDown Unit:=wdLine, Count:=15
MsgBox (Selection.Text)

它只打印该行的第一个字符.

Answer 1

您需要扩展选择:

Selection.MoveDown Unit:=wdLine, Count:=15
Selection.Expand wdLine
MsgBox (Selection.Text)