怎么用VBA获取WORD中前十行的文本

如何用VBA获取WORD中前十行的文本如何用VBA获取WORD中前十行的文本[解决办法]宏录制实现Sub 宏1() 宏1

如何用VBA获取WORD中前十行的文本
如何用VBA获取WORD中前十行的文本
[解决办法]
宏录制实现


Sub 宏1()
'
' 宏1 宏
'
'
    Selection.HomeKey Unit:=wdStory
    Selection.MoveDown Unit:=wdLine, Count:=10, Extend:=wdExtend
    Selection.Copy
End Sub