
2个回答
展开全部
With Selection
'移动当前光标到第N行,如要选定当前行,则下一句不需要
.GoTo What:=wdGoToLine, Which:=wdGoToFirst, Count:=N
'选定光标所在行:
.Expand Unit:=wdLine
'删除选定内容:
.Delete
End With
'移动当前光标到第N行,如要选定当前行,则下一句不需要
.GoTo What:=wdGoToLine, Which:=wdGoToFirst, Count:=N
'选定光标所在行:
.Expand Unit:=wdLine
'删除选定内容:
.Delete
End With
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询